如何将tr ///应用于Perl数组的每个元素?

Dav*_*vid 2 perl

有没有更好的方法在数组中的每个元素上使用tr ///而不是以下方法:

foreach (@list) {
    tr/abc/xyz/;
}
Run Code Online (Sandbox Code Playgroud)

我正在玩一些东西而且我无法理解它看起来不太正确/最佳.也许我只想到条件可以如何以后缀形式使用.有人知道是否有办法使用后缀形式tr ///或s ///?

out*_*tis 10

你在找:

tr/abc/xyz/ foreach (@list);
Run Code Online (Sandbox Code Playgroud)

它的基本工作方式与代码相同(每个元素的@list别名为$ _).在这种情况下,你只能见到Tim Toady和他兄弟的双胞胎Tom.

  • 你也可以忽略括号. (3认同)

Wil*_*ell 6

tr/abc/xyz/ for (@list); 适合我.