tr()函数：Perl 中强大的字符串翻译工具67

简介

在 Perl 中，tr() 函数是一个强大且多用途的字符串翻译工具，它允许您对字符串中的字符进行查找和替换。tr() 函数主要用于将字符串中的特定字符或字符范围替换为其他字符或字符范围。它也是执行简单字符翻译的有效方法，例如将小写字母转换为大写字母，反之亦然。

语法

tr() 函数的语法如下：```
tr/searchlist/replacelist/
```

其中：* searchlist：要查找的字符或字符范围的列表。
* replacelist：要替换为搜索列表中发现的字符或字符范围的列表。

工作原理

tr() 函数逐个处理字符串中的字符。对于每个字符，它将在 searchlist 中搜索该字符。如果字符在 searchlist 中找到，它将用 replacelist 中相应的字符替换。如果未找到字符，它将保持不变。

replacelist 的长度可以与 searchlist 相同或更短。如果 replacelist 较短，搜索列表中的剩余字符将被删除。如果 replacelist 较长，搜索列表中未找到的字符将保持不变。

示例

以下示例将字符串中的所有小写字母替换为大写字母：```
my $str = "hello world";
$str =~ tr/a-z/A-Z/;
print $str; # 输出：HELLO WORLD
```

以下示例将字符串中的所有数字替换为星号：```
my $str = "123456789";
$str =~ tr/0-9/*/g;
print $str; # 输出：
```

以下示例将字符串中的所有元音字母替换为空格：```
my $str = "Hello world";
$str =~ tr/[AEIOUaeiou]/ /g;
print $str; # 输出： Hll wrld
```

标志

tr() 函数支持以下标志：* g：全局匹配，替换所有找到的字符。
* c：补充，匹配 Unicode 补充字符。
* s：挤压，连续重复的字符只替换一次。

高级用法

tr() 函数还可用于执行更复杂的操作，例如：* 字符类：使用字符类（例如 "[A-Za-z]"）查找或替换一组字符。
* 正则表达式：使用正则表达式对字符串中的字符进行更高级的匹配和替换。
* 转换表：使用哈希表创建自定义转换表，用于将字符映射到其他字符。

tr() 函数是 Perl 中一个功能强大的字符串翻译工具，它允许您轻松地查找和替换字符串中的字符。通过理解其语法、工作原理和高级用法，您可以利用 tr() 函数有效地处理和转换字符串。

2025-02-09

上一篇：Perl中的-tw选项

下一篇：实用指南：Perl 中的 Wantlist