Select Code to Download

use strict;
use IO::Socket::INET;
...
for (;;) {
  &loop_socket();
}

use strict;
use POSIX ":sys_wait_h";
...
for (;;) {
  &timer_online();
}

use strict;
use IO::Socket::INET;
...
  &loop_socket();
  &timer_online();
}