Help for this page

Select Code to Download

Select or download this

BEGIN {
    my $tee = new IO::Tee(\*STDOUT, ">logfile");
    select($tee);
}