use English qw( -no_match_vars ); use File::Glob qw( bsd_glob ); @ARGV = map { bsd_glob($ARG) } @ARGV;