Help for this page
#!/usr/bin/perl -w ... close(ERRLOG) or die "Can't close filehandle! $!"; close(OUTPUT) or die "Can't close filehandle! $!";