Help for this page

Select Code to Download


  1. or download this
    sub run_and_time(&@) {
        use Time::HiRes;
    ...
        my @retlist = &{$func}(@_);
        print "Time to run $funcName: ", tv_interval($start_time), "\n";
    }