我想使用 perl 计算字符串中大写字母的数量。
例如:我需要知道单词“EeAEzzKUwUHZws”包含多少个大写字符。
最佳答案
当心 Unicode，因为直 A-Z 的东西对于其他字符并不真正可移植，例如带重音的大写字母。如果您也需要处理这些，请尝试:
my $result = 0;
$result++ while($string =~ m/\p{Uppercase}/g);
关于string - 使用perl计算字符串中的大写字母，我们在Stack Overflow上找到一个类似的问题： https://stackoverflow.com/questions/6652757/