|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Leonid Nikolaev 2:5020/52 13 Jul 2000 11:27:07
To : All
Subject : Re: Вот вопрос возник...
--------------------------------------------------------------------------------
Dmitriy Sedov wrote:
>
> Аве All, друг любезный. Hу заходи, давно заждались.
>
> Объясните пожалуйста что в следующей конструкции неправильно?
>
> _====================== начало ===============================_
>
> #!/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_, до ее появления все работало.
Вообще-то, на сколько я знаю, glob под виндой это внешний екзешник.
PerlGlob.exe вроде. Как с ним работать -- не знаю
Т.ч. делай через opendir
--- Mozilla 4.6 [en] (Win98; I)
* Origin: ADT (2:5020/52.0)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
Re: Вот вопрос возник... 
