http://www.perlmonks.org?node_id=996363


in reply to how to make close() fail

I'm wondering if there's an easier way.

You shouldn't ever need to use a close line

open my $fo, '<', "somefile" or die $!; ... blah blah # close($fo) implicit, not necessary

Any suggestions to make close fail?

use warnings; use strict; close (undef) or die;