in reply to how to make close() fail

Can you close the filehandle, then try closing it again?
open my $fh, '>', 'foo'; close $fh; close $fh or die $!; __END__ Bad file descriptor at