|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Eugene Bodin 2:5020/400 02 Aug 2002 07:30:14
To : Pechatnov Vladimir
Subject : Re: Маска в командной сроке в ActivePerl
--------------------------------------------------------------------------------
Hello Vladimir,
Pechatnov Vladimir <pvv@bspu.secna.ru> wrote:
PV> В Unix если его запустить script.pl *.log, то он понимает этот *.log и
PV> напечает все строки файлов с расширением log
PV> В Windows это не катит - говорит
PV> Can't open *.log: Invalid argument
PV> Это так и должно быть или мож чего где то полечить можно или же только
PV> ручками разбирать все надо?
Можно ручками, можно поставить такой вот модуль :-)
-- begin Globber.pm --
package Globber;
require 5.005_62;
use strict;
sub import {
my ($param, @params);
for $param ( @main::ARGV ) {
push @params, glob($param);
}
# Могут быть дупы (если, например, было *.log *.l* )
@main::ARGV = @params;
}
1;
-- end Globber.pm --
запуск:
perl -MGlobber script.pl *.log
или в script.pl написать
use Globber;
Best regards,
Eugene
--- ifmail v.2.15dev5
* Origin: RadioScan (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
Re: Маска в командной сроке в ActivePerl