perl 程序中字符串怎么 toLowerCase

perl 程序中字符串怎么 toLowerCase

RT,  perl 程序中字符串怎么 toLowerCase ! 谢谢
try this code:

QUOTE:
perl -e '$str="WELCOME TO PERL";$str=~s/(.*)/\L\1/g;print $str'

lc $string
\l$singlechar

\L$string
1. $str =~ tr/[A-Z]/[a-z]/;
2. lc $str;