Exercising Perl

学语言之类的,当然不能光学不练,纸上谈兵。我看了《Learning Perl》之后,打算把习题都练一遍~
练的时候才发现,很多东西需要重新学习…… 另外,有些地方重新学了还是不能做到最好。
Perl’s motto: There’s more than one way to do it.
Perl的精神:省力! 汗%……
比方说,现在我还没有使首字母大写的好办法。现在是这样的:
$a=~s/^o/O/;
$a=~s/^t/T/;
$a=~s/^f/F/;
$a=~s/^s/S/;
$a=~s/^e/E/;
$a=~s/^n/N/;
等等…… 26条啊!…… 肯定有好方法的,谁知道告诉我一声……
花了半天做到第十章。明天应该就可以搞定了……