do "1" failed, '.' is no longer in @INC

Oops, you're right, do EXPR is certainly not what I meant to do, my mistake. I guess a sub probably is cleanest, though something like {my $x=eof local *!} still works.

Minor edits.