my $pattern = "----- blah de blah ----";
    do_whatever($_) foreach split /$pattern/, join '', <> ;