|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Dmitriy Sedov 2:5020/1353.33 12 Jul 2000 13:28:45 To : All Subject : Вот вопрос возник... --------------------------------------------------------------------------------
Объясните пожалуйста что в следующей конструкции неправильно?
_====================== начало ===============================_
#!/usr/local/bin/perl
while (defined($file = glob("*.lst")))
{
open (WORDSLIST, $file) || die "can't open wordslist: $!";
while($name = <WORDSLIST>)
{
chomp ($name);
$word = <WORDSLIST>;
chomp $word;
write;
}
close (WORDSLIST) || die "Couldn't close wordslist: $!";
}
format STDOUT =
@<<<<<<<<<<<<<<<<<< @<<<<<<<<<<<<<<
$name, $word
.
format STDOUT_TOP =
Page @<<
$%
Name Word
=================== ===============
.
_======================== конец ==================================_
При запуске пишет что:
*"Указаное имя не является внутренней или внешней*
*командой, исполняемой программой или пакетным файлом."*
Использую PERL 5.004 for win32. Такое подозрение что не работает функция _glob_,
до ее появления все работало.
С уважением, Дмитрий.
--- venazgul@mtu-net.ru GoldEd+/W32
* Origin: Имея не ценим, потерявши плачем. (2:5020/1353.33)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/17811396c9c83.html, оценка из 5, голосов 10
|