How can I handle wildcards on the command line using Perl on Windows?

Question

I though this would be simple, but apparently I can't do:

script.pl *.ext

in the WinXP command processor.

Is there a built-in solution? (i.e. not a CPAN module?)

Answer 1

File::DosGlob is a core module:

#!/usr/bin/perl

use strict;
use warnings;

use File::DosGlob qw( glob );
print map { "$_\n"} map { glob } @ARGV;
__END__

    C:\Temp> tgh *.pl
    ...
    tgh.pl
    tgm.pl
    thg.pl
    thk.pl
    tjl.pl
    tjm.pl
    tkj.pl
    tkl.pl

Answer 2

Use the glob function.

...returns a (possibly empty) list of filename expansions on the value of EXPR such as the standard Unix shell /bin/csh would do...