- RU.PERL ----------------------------------------------------------- RU.PERL -
Msg : #3041 [502]
От : Serge Chervjakov 2:5020/400 25 марта 04, 07:55
Кому : Anton Dvoryasin 26 марта 04, 23:26
Тема : как?
-------------------------------------------------------------------------------
From: "Serge Chervjakov"
Wed Mar 24 2004 23:21, Anton Dvoryasin wrote to All:
AD> Возникла нужда поработать с расширением файла, которое из трёх цифр (но
AD> это условие может и измениться)
AD> foreach (<*.[0-9][0-9][0-9]>) {
AD> @words = split (/ /); Вот, тут по идее (моей) $_ должна разбиться по
AD> точке на два куска, но этого не происходит, где я не так? Ведь вполне
AD> возможно что везде, блин..
не - ну не знаю, что подразумевается под конструкцией
foreach (<*.[0-9][0-9][0-9]>), но для начала проверь - работает ли
foreach (<*.[0-9][0-9][0-9]>) {
print $_,"\n";
}
- выдает ли те файлы что разбить надо.
И вот если выдает, то попробуй таки сделать так:
my @words=split(/\./, $_);
($_ наверно можно и не указывать, но мне так больше нравится - место немного
занимает, а вот разбираться плохосведущему гораздо проще).
--- ifmail v.2.15dev5.3
* Origin: FidoNet Online - http://www.fido-online.com (2:5020/400)