ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Andrey Sapozhnikov 2:5020/400 31 Jul 2002 21:10:44
To : Yury Shvetsov
Subject : Re: Global variable
--------------------------------------------------------------------------------
Yury Shvetsov wrote:
> "Artem Chuprina" <ran@ice.ru> wrote in message
> news:slrnakg1j6.3kk.ran@banquet.lan.ice.ru...
>
>
>>perldoc constant.
>>
>
> А как обращаться к константе из другого модуля?
> Bareword "main::my_const" not allowed while "strict subs" in use.
>
> Юрий Швецов.
>
>
>
=== a.pl ===
#!/usr/bin/perl -w
use strict;
use constant itsme => "Hey! ";
use a;
print a::hello;
=== a.pm ===
package a;
use constant hello => "Hello, world\n";
print main::itsme;
1;
==== EOF ===
$ ./a.pl
Hey! Hello, world
И никаких ошибок и варнингов. Проверьте последовательность описаний
и вызовов. Вероятно Вы где-то используете константу ДО ее описания.
Андрей
--- ifmail v.2.15dev5
* Origin: Demos online service (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
