Select Code to Download

sub my_sleep {
    my $sleep_time = (shift or 1); # total time to sleep
...
    my $elapsed = time - $start;
    return $elapsed; # total time actually slept (plus shipping and ha
+ndling)
}