Re: Perl Idioms Explained - my $string = do { local $/; <FILEHANDLE> };

[skillet-thief]

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>;
}

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

Cheers,
s-t