Design Question - OPEN/CLOSE FILE

[shlomyb]

Hi

I have a script that open a file , do some actionsa and close the file.

In the "do some actions" section I check some conditions and can exit the script with error(1) WITHOUT close the file ( cause in the script , I did not get there yet ...)

Does Perl close the file automitacally ?

OR should I create an EXIT sub that will close the file and then will exit(1) ?

Thanks( as usual )

 

[stevexff]

perl closes any open files when it exits.

Steve

[small]"Every program can be reduced by one instruction, and every program has at least one bug. Therefore, any program can be reduced to one instruction which doesn't work." (Object:erlDesignPatterns)[/small]

 

[PaulTEG]

As steve says Perl closes any files it opens, but you may lose some data due to buffering.

I'd say it's good practice to close open files, before exiting, regardless. Also, if you meet an error condition, you can use the last keyword to exit file read loops gracefully in the event of an error, and exit the program normally.

Just my €0.02
--Paul

Paul
------------------------------------
Spend an hour a week on CPAN, helps cure all known programming ailments ;-)