'read ARGV, $b, 1<<12 or die "cannot read ARGV: $!"; 

##</code><code>##

read() on unopened filehandle ARGV at -e line 1.
cannot read ARGV: Bad file descriptor at -e line 1.

##</code><code>##

() = eof(); read ARGV, $b, 1<<12 or die "cannot read ARGV: $!";