Help for this page

Select Code to Download


  1. or download this
    sub tprint {
        my $t = time;
    ...
    sub getResultsAPI_4 { getResultsAPI(4, 5) }
    sub getResultsAPI_5 { getResultsAPI(5, 11) }
    sub getResultsAPI_6 { getResultsAPI(6, 7) }
    
  2. or download this
    $ perl pm_11107400.pl
    1570989189: API_1: dozing for 12s
    ...
    1570989201: API_1: done
    1570989205: API_3: done
    1570989211: API_2: done