对不起,如果它是一个重复的主题,但我在论坛内搜索过,我只发现了类似但不相同的问题。
我的问题是:
我有一个这样的字符串数组:
@array = ("My name is "Annie" \n", "My mother's name was "Annie", too. \n", "I am "27" years old \n", "I live in "Minnesota" \n");
还有另一个像这样的字符串数组:
@subs = ("Annie", "22", "Minnesota");
我想:
1) 在第一个数组中查找第二个数组中出现的任何单词(例如:Annie 将匹配第一个和第二个元素,Minnesota 只匹配最后一个元素)。
2) 将与第二个数组的任何元素匹配的所有单词替换为相同的单词,后跟“-DATA”(例如:“My name is "Annie-DATA"\n")。
我想这可以通过一两个 for 循环轻松完成,但我想知道是否有更快的方法,也许可以巧妙地使用 PERL 的正则表达式。
谢谢!