Re^2: Any downsides to this slurp idiom?

[choroba]

Note that localizing @ARGV could be not enough (because eof(ARGV) might remain true). So,

my $data = do { local ( *ARGV, $/ ); @ARGV = ("$file"); <> };