Select Code to Download

for ($i = 0; $i <= 65535; $i++) {
  print "port $i\n";
  system "this takes 45 seconds to timeout";
}

for ($i = 0; $i <= 65535; $i++) {
  print "port $i\n";
...
  sleep 2;
  kill ('INT', $$);
}