in reply to strip until blank line

This will strip everything up to, but not including the first blank line. You can modify it to include the first blank if that is what you actually need.
HTH
#!/usr/bin/perl -w my $x = 0; while(<DATA>) { $x = 1 if /^\s+$/; next if $x != 1; print; } __DATA__ bad stuff more bad stuff someother bad stuff some good stuff more good stuff more good stuff