There appears to be an error in PerlFAQ4 in the section "How do I
capitalize all the words on one line?".
It seems that
$string =~ /([\w']+)/\u\L$1/g;
is missing an 's' and should read
$string =~ s/([\w']+)/\u\L$1/g;
All the best and keep up the good work
Rich
