复杂hash解读疑问

sandy_amao

ＰＥＲＬ太博大精深了．．．．．
下面是某大神写的代码：
看了一下没看明白
Question:
1)这个是不是一个嵌套hash? 最后的一步
method => sub { @_ },
                A1         => 'TEST1',
                A2         => 'TEST2',
                A3         => 'TEST3'
这个用到了sub{@_}的意思是什么意思？大神们能不能用另外的方式把上面的代码重写一下？
2）怎么把代码中的A1或A2对应的值打印出来？用print "$config{&CONFIG}{method}->{A1}";
打印出来的是空白

谢谢！


代码如下：
use constant CONFIG        => 'detail';
my %conf = (
        detail => {
                method => sub { @_ },
                A1         => 'TEST1',
                A2         => 'TEST2',
                A3         => 'TEST3'
                        },
);

substr函数

回复 1# sandy_amao

把代码中的A1或A2对应的值打印出来？
用print
print "$config{CONFIG}{A1}";
   

sandy_amao

回复 2# substr函数

不行啊！打不出来

   

substr函数

回复 3# sandy_amao

print $conf{detail}{A1};


   

sandy_amao

substr函数 发表于 2015-06-24 15:37
回复 3# sandy_amao

print $conf{detail}{A1};

可以了。谢谢


这么看来，下面的这个代码是多余的？删除了也可以啊
method => sub { @_ },

substr函数

这个sub
my @confusing = $conf{detail}{method}("hello", "world");
print "@confusing";

sandy_amao

substr函数 发表于 2015-06-24 15:42
这个sub
my @confusing = $conf{detail}{method}("hello", "world");
print "@confusing";

啊大师，我明了：你的意思是用这个ｓｕｂ是用来接收数组的。

浅浅的墨伤

method => sub { @_ }
这个应该是用来接收定义的方法，实际上整个method、A1、A2是detail hash的内容，应该是这样的。