Help for this page
#!/usr/bin/perl use strict; ... close STDOUT; open STDOUT, ">", "/log/foo" or die $!; print "after IO redirection\n";
perl the_script.pl >/log/foo