in reply to
Wrap the print in an eval perhaps?
no warnings 'unopened';
Inside a small block should work though. See perllexwarn.
no warnings qw(unopened);
open HUBBA, "/hubba";
print HUBBA "hubba";
Guess I have to disable all warnings...
Seems you need to exclude the closed warning too.
It seems that unopened works if you never tried to open the file, and closed if the open failed, or it was closed. TIL.
Compiling them myself
Merijn's HP-UX software
Whatever is shipped with my OS release
None, i use PerlScript
Results (173 votes),