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