19、Perl编程：字符串处理与操作系统交互全解析

Perl编程：字符串处理与操作系统交互全解析

1. 字符串处理之转译操作符

在字符串处理方面，转译操作符 tr/old/new/ 是一个强大的工具。它与第7章提到的替代操作符 s/// 有些相似，但 tr/// 操作符与正则表达式并无关联。

• 基本用法 ：该操作符会将两个参数中的字符一一对应，然后用这些配对来替换引用字符串中的单个字符。例如， tr/one/two/ 会将引用字符串中所有的 “o” 替换为 “t”，“n” 替换为 “w”，“e” 替换为 “o”。默认情况下，它会对 $_ 中的字符进行转译。若要对其他字符串进行转译，可使用 =~ 操作符，如 $string =~ tr/old/new/; 。
• 范围使用 ：可以在转译中使用范围，但不能使用任何字符类。例如，若要将字符串中的所有数字替换为字母，可写成 $string =~ tr/0123456789/abcdefghij/; ，也可简化为 $string =~ tr/0-9/a-j/; 。
• 返回值 ：该操作符的返回值默认是转译的字符数量。因此，可利用它来统计某些字符的出现次数。例如，统计字符串中元音字母的数量，可使用 my $vowels = $string =~ tr/aeiou//; <