Select Code to Download

use strict;
use warnings;
...
  1 while time < $nextsecond;
  printf "%.6f\n", time;
}

1579973997.000000
1579973998.000000
...
1579974000.000000
1579974001.000000
^C