use Data::Dumper; my @para = do {local $/ = "\n\n"; }; print Dumper \@para; __DATA__ blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah blah