|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Artem Chuprina 2:5020/400 11 Feb 2004 03:21:22
To : Dmitry Y. Labutin
Subject : Re: Передача HASH'а в процедуру по значению
--------------------------------------------------------------------------------
Dmitry Y. Labutin -> Dmitry Y. Labutin @ Tue, 10 Feb 2004 11:35:14 +0000 (UTC):
DYL>> sub qqq
DYL>> {
DYL>> # Что здесь нужно написать чтобы можно было написать так?
DYL>> $tmp->{c} = 2;
DYL>> #$_[0]->{c} = 2;
DYL>> }
DYL> Вроде разобрался. Так правильно?
DYL> use strict;
DYL> sub qqq
DYL> {
DYL> my $temp = \$_[0];
DYL> $$temp->{c} = 2;
DYL> }
DYL> my %a;
DYL> $a->{a} = 1;
DYL> print $a->{a}."\n";
DYL> qqq ($a->{b});
DYL> print $a->{b}->{c}."\n";
В принципе да, но обращаю внимание, что use strict ты забыл совершенно
зря. %a к тому, что ты пишешь с $a, не имеет никакого отношения.
--
Artem Chuprina
RFC2822: <ran@ran.pp.ru>, FIDO: 2:5020/122.256, ICQ: 13038757
--- ifmail v.2.15dev5.3
* Origin: Leninsky 45 home network (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
