форумы  помощь  поиск  регистрация  майллист  вход/выход  слежка

Вариант для распечатки		Пред. тема | След. тема
Форумы Программирование под UNIX (Public)
Изначальное сообщение		[ Отслеживать ]

"Perl OOП 2"

Сообщение от Azudim (??) on 19-Авг-08, 22:23

Подскажите плз, как сделать: Дано: Какой-то модуль, скрипт index.pl, скрипт req.pl. ---- index.pl ------------- use Module.pm $const = new Module; $const->{count} = 1; #далее через require вызываем второй скрипт require req.pl 1; -------------End----------- второй скрипт: -------------req.pl-------- $const->print(); # Функция выводит $const->{count} ---------------- в таком варианте из req.pl метод print() не вызывается, ругается что $const не определена. как я понимаю req.pl это другое пространство имен. а как бы можно было обращаться изнутри скриптов включенных по require к экземпляру класса, созданному ранее?

Высказать мнение | Ответить | Правка | Cообщить модератору

Сообщения по теме

[Сортировка по времени | RSS]

1. "Perl OOП 2"

Сообщение от arturpub (ok) on 20-Авг-08, 17:55

--- x.pl package main; our $pub = "x"; my $prv = 3; print "x.pl: 1: pub is $pub, prv is $prv\n"; require "y.pl"; print "x.pl: 2: pub is $pub, prv is $prv\n"; --- y.pl print "y.pl: 1: pub is $pub, prv is $prv\n"; $pub = "y1"; my $pub = "y2"; print "y.pl: 2: pub is $pub, prv is $prv\n"; print "y.pl: 3: pub is $::pub, prv is $::prv\n";

Высказать мнение | Ответить | Правка | Наверх | Cообщить модератору

Архив | Удалить	Индекс форумов | Темы | Пред. тема | След. тема
Оцените тред (1=ужас, 5=супер)? [ 1 | 2 | 3 | 4 | 5 ] [Рекомендовать для помещения в FAQ]