|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Artem Chuprina 2:5020/400 04 Jun 2001 13:03:59 To : Alexander Bolotnov Subject : Re: require... -------------------------------------------------------------------------------- Здравствуй, Alexander Bolotnov. В твоём письме от Sun, 03 Jun 2001 11:26:29 +0400 написано: AB> что-то я точно делаю не так. у меня такая штука: AB> require errors.pm; AB> my $er = 0; AB> error("no name") if (!$name); AB> print $er; AB> ---errors.pm---- AB> sub error(){ AB> my ($mes) = (@_); AB> print $mes; AB> $er++; AB> } AB> самое интересное, что если print $er делать из errors.pm, то все AB> выводится, то есть циферка прибавляется, а если в самой проге - то нет... AB> где надо чинить? В ДHК, увы. RTFM какую-нибудь книжку (Programming Perl или Advanced Perl Programming). От начала до конца. Особое внимание обращая на главы об области видимости переменных и пространствах имен. В дополнение сгодится perldoc -f my. Если вышеотквоченное - это _все_ содержимое errors.pm, то добавить еще про модули. -- Artem Chuprina E-mail: ran@ran.pp.ru Programmer FIDO: 2:5020/371.32 Memonet Ltd. Phone: +7-095-284-1356 --- ifmail v.2.15dev5 * Origin: NTV Internet (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/16483bf254bd1.html, оценка из 5, голосов 10
|