Help for this page

Select Code to Download

Select or download this

use autodie qw( open close );

...
close $output_fh;

exit 0;