Select Code to Download

$| = 1;  # Turn off buffering on STDOUT.
print(  "    5"); sleep(1);
...
print("\r    2"); sleep(1);
print("\r    1"); sleep(1);
print("\r** BOOM **\n");