Select Code to Download

       $/      The input record separator, newline by default.
               This influences Perl's idea of what a "line" is.
...
               empty line.  Setting to "\n\n" will blindly assume
               that the next input character belongs to the next
               paragraph, even if it's a newline.

#!/usr/bin/perl
my @paras = do { local $/=""; <DATA> }; #Idiom localizing $/
...


This is the 3rd.