in reply to Perl Idioms Explained - my $string = do { local $/; <FILEHANDLE> };

Maybe I'm missing something. Besides basic coolness, and getting it down to one line, I don't understand the specific advantage of using "do" as opposed to how I usually slurp: 
my $string;
{
local $/ = undef;
$string = <FH>;
}

[download]
That said, I do like the way the proposed idiom looks.

Cheers,
s-t
  • Comment on Re: Perl Idioms Explained - my $string = do { local $/; <FILEHANDLE> };
  • Download Code

In Section Meditations