Unfortunately, applying binmode to ARGV before the file is opened, doesn't persist once perl uses @ARGV to open the file:(. Presumably reset during the open.

I guess that renders Juerd's idiom unusable for binary files unless their is some way of interjecting between the open and the read done by <>;