Take a look at Perl6::Slurp which is a back-port of Perl6 slurp built-in and accepts regex for input record separator.

        # Specify input record separator...
       
        $file_contents = slurp $file, {irs=>"\n\n"};
        $file_contents = slurp '<', $file, {irs=>"\n\n"};
        $file_contents = slurp {irs=>"\n\n"}, $file;
[download]