引用

超级细菌

有这么一个引用：
$a->{$b}->{$c}->{$d}->{$e}=$f;
是否可以用另外一个变量来代替其中的一部分，比方说$g=$a->{$b}
如果可以的话，是不是新的引用就成为了$g->{$c}->{$d}->{$e}？
然后这样的话，原来的那种数据结构不会改变吧？
多谢！

兰花仙子

有这么一个引用：
$a->{$b}->{$c}->{$d}->{$e}=$f;
是否可以用另外一个变量来代替其中的一部分，比方说$g ...
超级细菌 发表于 2011-06-22 16:05

    仙子没理解错的话，你需要的是“别名”而不是赋值。

$ perl -le '$a->{b}->{c}->{d}->{e}="f"; *x=$a->{b}->{c}->{d}; print $x{e}'               
f

超级细菌

多谢版主，我那些其中的变量都是在读取数据的过程中产生的，你的例子我明白了，也就是说可以把其中的一部分用另外的名字来代替

flw

当然可以的呀！
仙子显然理解错误了。

兰花仙子

当然可以的呀！
仙子显然理解错误了。
flw 发表于 2011-06-22 16:50

呃。。如果赋值的话，数据结构应该是改变了的。

1. use strict;
   
2. use Data::Dumper;
   
3. 
   
4. my $x={};
   
5. $x->{a}->{b}=1;
   
6. 
   
7. my $y = $x->{a};
   
8. $y->{b}=2;
   
9. 
   
10. print Dumper $y;
    
11. print Dumper $x;

复制代码

output:

$VAR1 = {
          'b' => 2
        };
$VAR1 = {
          'a' => {
                   'b' => 2
                 }
        };

超级细菌

再次感谢二位版主