Does Perl not support s//g?