Help for this page
#!/usr/bin/perl ... close( $sub_log_file ); print "End: Coming from the script.\n";
#$ perl test.pl > /tmp/main_log.txt