Select Code to Download

  my $mask    = shift;
  my @folders    = glob("$mask");
...
  if (scalar(@folders) == 0) {
    return undef;
  }

@t1 = glob('*1');
@t2 = glob('1');
@t3 = glob('file2');
@t4 = glob('*3');