我前几天参加了一个编程面试,要求我用Perl写一段代码,实现标题中描述的功能,经过一段时间,我想出了以下解决方案:
sub startWithUppercaseLetter {
return @_[0] =~ m/^[A-Z]/;
}
面试官似乎对这个解决方案不满意,有人可以提供更好的解决方案吗?谢谢
最佳答案
我会写
sub starts_with_capital {
shift =~ /^[A-Z]/;
}
你自己的解决方案无法生存使用警告
,给予
Scalar value @_[0] better written as $_[0]
在本地标识符中使用大写字母是不好的做法。
关于regex - 在 Perl 中检查给定字符串是否以 A-Z 开头,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/22107927/