Как я могу обрабатывать подстановочные знаки в командной строке с помощью Perl в Windows?

Question

я, хотя это было бы просто, но, видимо, я не могу сделать:

script.pl *.ext

в процессоре командной WinXP.

Есть ли встроенное решение? (т. е. не модуль CPAN?)

Answer 1

File::DosGlob является основной модуль:

#!/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

Используйте функцию glob.

... возвращает (возможно, пустой) список имен файлов расширения на величину EXPR таких как стандартный Unix оболочки /бен/CSH будет делать ...