|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Artem Chuprina 2:5020/371.32 26 May 2000 10:37:00 To : Evgeny Kariakin Subject : Re: Модуль хочу -------------------------------------------------------------------------------- <Evgeny_Kariakin@p100.f744.n5020.z2.fidonet.org> wrote: EK> --= тут все аплодируют, аплодируют... [InitBans.pm] =-- EK> #!/usr/local/bin/perl -w EK> #InitBans.pm EK> package InitBans; [skip!] EK> my @shows = (); [skip!] EK> 1; EK> --= кончили аплодировать [InitBans.pm] =--------------- EK> Откуда его вызываем: EK> --= тут все аплодируют, аплодируют... [manager.pl] =-- EK> #!/usr/local/bin/perl -w EK> #manager.pl EK> use strict; EK> $| = 1; EK> use InitBans; EK> # Hа самом деле хочу сделать require , чтобы не импортировались имена. Hадо EK> # обращаться к переменным как $ModuleName::some_variable , то есть с EK> указанием # модуля. use InitBans (); EK> print $InitBans::shows[0][0] , "\n"; EK> # Вот тут проблема -- пишется EK> # Use of uninitialized value in print at manager.pl line 42. EK> exit( 0 ); EK> --= кончили аплодировать [manager.pl] =--------------- EK> Скажите, почему @shows не виден? Потому что my. -- Счастливо! Ран. --- ifmail v.2.14.os-p7-tma3 * Origin: MemoNet (2:5020/371.32@fidonet) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/34739b909c97.html, оценка из 5, голосов 10
|