Select Code to Download

foreach my $arg (@ARGV) {
  foreach (glob $arg) {
    print;
  }
}

BEGIN {@ARGV=map glob, @ARGV}