in reply to Re^2: checking bareword-filehandlein thread checking bareword-filehandle
After skimming perlmod and perlref I've dug up
print FH $foo if *{$foo}{IO}; [download]
which is somewhat ugly, but seems to work.