Re: How to use __DATA__ efficiently, help!

[shawnhcorey]

my $data = '';  # set to the empty string
do{ $data = $data . $_ } while (<DATA>);

Always initialize your variables.

[Anonyrnous Monk]

Actually, that wouldn't help here, as it's not the undefined $data that Perl is complaining about, but the undefined $_.