|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Andrew Alakozow 2:5061/29.2 14 Dec 2003 10:56:51 To : Sergey Gernichenko Subject : use strict --------------------------------------------------------------------------------
Sergey Gernichenko wrote to Konstantin Tokar...
SG> так... по поводу $sum я ошибся... задавал my $sum... а надо было my
SG> %sum... А вот с ссылкой на хеш $price как быть? она определяется во
SG> включаемом файле таким образом: $price={'5543' => {'DC' => 66, 'PC'=>
SG> 77, 'OP' => 55}}; ну и т.д.
require происходит на этапе выполнения, а ошибка выдается на этапе компиляции.
Чтобы файл подключался на этапе компиляции, require нужно поместить в блок BEGIN
BEGIN { require 'foo.pl'; }
Кроме того, у файла который ты require или do другое лексическое пространство
имен. Используй глобальные переменные через use vars.
perldoc -f require
perldoc -f do
perldoc vars
aa29.2
--- (.) ---
* Origin: Зукд ащкумук! (2:5061/29.2)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/27713fdc0dd3.html, оценка из 5, голосов 10
|