use strict; use warnings; my @lines = ; my @greped = grep {! /remove/} @lines; print foreach @greped; __DATA__ 1 String not in this line 2 remove is here 3 but not here