open FH, $some_file or die "Can't open $some_file, Perl says $!\n";
LOOP:
while (<FH>) {
    next until /$some_cond/;
    while (<FH>) {
        last LOOP if /^\s$/;
        print;
    }
}
[download]

Edit $some_file and $some_cond to suit. We use the default aliasing to $_ in our while loops, regex match and print.

cheers

tachyon

s&&rsenoyhcatreve&&&s&n.+t&"$'$`$\"$\&"&ee&&y&srve&&d&&print