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

Question

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

script.pl *.ext

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

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

Answer 1

Файл :: 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 / bin / csh сделает ...