Help for this page

Select Code to Download


  1. or download this
            sleepUntil(
            nextTimeOccurence({time=>'3:15', weekdays=>'MTWRF'}), 
            sub {printf"%s - Next telemetry pull in %s.\r", scalar loc
+altime, englishTime(shift)}
            );
        print "\n";
  2. or download this
    sub sleepUntil
{
...
    $time = int($time/24);
    return "$time day".($time==1?'':'s');
}