y/SEARCHLIST/REPLACEMENTLIST/ |
与tr/操作相同; SEARCHLIST中的所有字符转换成相应的字符REPLACEMENTLIST ,它会字符到字符的转换。
修改的字符数
#!/usr/bin/perl -w #by www.gitbook.net $string = 'the cat sat on the mat.'; # This will generate a upper case string $string =~ y/a-z/A-Z/; print "$string\n";
这将产生以下结果:
THE CAT SAT ON THE MAT.