Select Code to Download

while
    set $time to current time
    test $time < $expiry
...

  $prevtime = $time
  warn $time

$expiry = 3600
$prevtime = undef
$time = undef
...
4th loop:
    $time = 133 (last iteration took less than 1s)
    ...