Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl
use strict;
...
printf "%s : %s\n", scalar localtime(), "BEGIN - MAIN";
($ReturnValue) = &MainSub;
printf "%s : %s\n", scalar localtime(), "END - MAIN";
  2. or download this
    # time ./TestSigalrm.pl
Wed Jul 24 08:38:20 2019 : BEGIN - MAIN
...
real    0m10.018s
user    0m0.014s
sys     0m0.002s