C:\_wo>perl -e "my $line = \"Line1\nLine2\nLine3\n\nXYZ: Blah\n\"; $line =~ s|\nXYZ.+\n||m; print $line;" Line1 Line2 Line3 C:\_wo>