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

Question

有数组中的比每个元素上使用TR ///一个更好的方法如下：

foreach (@list) { 
    tr/abc/xyz/; 
} 

我有一些东西玩耍，我只是不能把它弄出来我的头它看起来不太正确/最佳。也许我只是在考虑如何在后缀表单中使用条件。任何人都知道是否有一种方法来使用tr ///或s ///的后缀形式？

Answer 1

你是否在寻找：

tr/abc/xyz/ foreach (@list); 

基本上以同样的方式为你的代码（的@list每个元素别名为$ _）。在这种情况下，你只能见到Tim Toady和他的兄弟姐妹Tom。

Answer 2

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

Answer 3

谁使用括号for作为语句修饰符？

tr/abc/xyz/ for @list; 

而且，如果你打高尔夫球，你可以通过使用y代替tr保存一个或多个字符。

Answer 4

我不是for作为语句修饰符的巨大粉丝;不知道为什么，因为它没有什么不对，它只是没有用其他语句修饰符所做的那种自然语言的方式告诉我。正因为如此，我会使用map代替：

map(tr/abc/xyz/, @list); 

纯粹是偏好的事，我张贴在这里仅作为例子。其他答案也很好。

Answer 5

如果你想要它作为表达式，那么我更喜欢（表达式开始于map）。

my @trlist = map { tr/abc/xyz/; $_ } @list; 

但foreach品种可能是当你只是想改变在列表中的项目最简单的方法：

tr/abc/xyz/ foreach @list;