删除字符串的第一部分

时间:2018-06-28 05:17:01

标签: arrays string perl

我有一个数组,其中包含一些字符串(例如,这里包含三个字符串):

@array = ("Foo", "Bar", "Baz");

我还有另一个数组,其中包含以下形式的数千个元素,

@senocndArray = (test/Foo/the_Rest_of_string, test/Bar/the_Rest_of_string, test/Baz/the_Rest_of_string)

现在我要做的是在下面的for循环中删除部分test/$element

for my $element(@array){
    my $string = "test/$element";
    for $secondElement(@senocndArray){
        # delete the $string part of each element of @senocndArray
    }
}

在第二个循环中,我想删除第一部分并将其保存在另一个数组中或覆盖$secondElement。我尝试过

$secondElement =~ s/$string //;

但这对我不起作用。有人可以帮助我知道我的错误在哪里吗?

1 个答案:

答案 0 :(得分:5)

application.enableevents = true

“ $ string”后面有多余的空格