Select Code to Download

#!/usr/bin/perl use Net::FTP;
use Archive::Extract;
...
}

exit;

#!/usr/bin/perl

...
  #do whatever you want here
  return 1;
}