Select Code to Download

#!/usr/bin/perl -w

...
# And get on with the show!
exec(@ARGV)
    or die "exec error: $!\n";

#!/usr/bin/perl -Tw

...
{
  print CLIENT "The time is now ",scalar localtime,"\n";
}