ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Korol Evgeny                         2:5020/400     20 May 2000  03:18:38
 To : All
 Subject : Re: Модуль хочу
 -------------------------------------------------------------------------------- 
 

 
 > #!/usr/local/bin/perl -w
 > #InitBans.pm
 >
 > package InitBans;
 >
 > use strict;
 > use vars qw( @ISA @EXPORT );
 > use Exporter ();
 > @ISA = qw( Exporter );
 > @EXPORT = qw( &init_bans @shows );
 >
 > my @shows = ();
 >
 > sub init_bans {
 > # Идёт формирование массива @shows . Двухмерный.
 > };
 >
 > 1;
 
 [skipped]
 Скажите, почему @shows не виден?
 
 > use vars qw( @ISA @EXPORT );
 > use Exporter ();
 > @ISA = qw( Exporter );
 > @EXPORT = qw( &init_bans @shows );
 >
 > my @shows = ();
 
 А массивчик @shows лексический, не выходит он за область видимости данного
 пакета.. нужно
 
 use vars qw{ @shows };
 
 тогда и my не нужен..
 
 Респекты.
 --- ifmail v.2.15dev5
  * Origin: Demos online service (2:5020/400)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор