ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Dmitry Y. Labutin 2:5020/400 10 Feb 2004 14:21:18
To : Sergey Gernichenko
Subject : Re[4]: Передача HASH'а в процедуру по значению
--------------------------------------------------------------------------------
Приветствую.
SG> Запись вида $q{c}{a}... - неправильная.
SG> Изучи perldoc perlref, там и о сложных структурах рассказывается.
Вот:
use strict;
sub qqq
{
$_[0]->{c} = 2;
}
my %a;
$a->{a} = 1;
print $a->{a}."\n"; # печатает 1
qqq ($a->{b});
print $a->{b}->{c}."\n"; # печатает 2
Уже почти то, что мне нужно. Такой вопрос - как в подпрограмме qqq
правильно присвоить значение другой переменной, чтобы я через нее
присвоил значение?
sub qqq
{
# Что здесь нужно написать чтобы можно было написать так?
$tmp->{c} = 2;
#$_[0]->{c} = 2;
}
--
Дмитрий Лабутин
dmitry@incub.ru
Отправлено через сервер Форумы@mail.ru - http://talk.mail.ru
--- ifmail v.2.15dev5.3
* Origin: incub creative team (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
