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