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

##</code><code>##

foeach (map { glob } @ARGV) {
  print;
}