my @new = grep { $_ ne "certain string" } @old; #### my @new = grep { index($_, "certain string") == -1 } @old;