Select Code to Download

next if (($regex) and ($host !~ /$regex/));

sub execute {
my $i = shift;
...
    }
  }
}