如何在没有uc()函数的情况下将字母转换为UpperCase?

时间:2013-01-17 15:28:50

标签: perl uppercase lowercase

我正在尝试编写一个脚本,它将所有字母从小写转换为大写而不使用uc()函数。

2 个答案:

答案 0 :(得分:6)

您可以使用$str =~ tr/a-z/A-Z/之类的内容,但uc可能更适合Unicode支持,如果它对您很重要。

答案 1 :(得分:5)

使用正则表达式:

$str =~ s/(.)/\u$1/g;