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


in reply to exit code from FILEHANDLE object.

You get 1 because close is successfull.

Please have a look at $? in perlvar.

In Section Seekers of Perl Wisdom