如何取消引用从类方法返回的哈希？

Question

我有一个类,返回一个哈希的方法.通常,我会得到如下结果:

%resp = $myclass->sub($foo);

然后像这样访问返回的哈希的成员:

$resp{key}{subkey};

在2d哈希的情况下.

我认为必须有一种方法将它组合成一条优雅的线,如下所示:

$myclass->sub($foo)->{key}{subkey}

这显然没有被正确解除引用,因为Perl在尝试运行代码时返回此信息:

Can't use string ("1/8") as a HASH ref

在尝试随机解引用序列时,通过在Perlmonks上查看"References quick reference",我提出了以下内容,Perl没有抱怨,但也没有返回我正在寻找的内容:

$%{$myclass->sub($foo)}->{key}{subkey}

有人能告诉我神奇的解引用转义序列是做什么的吗？

Answer 1

你要做的不是优雅也不可取.你以某种方式设法在标量上下文中调用例程(这是"1/8"对应的).

返回哈希引用.

现在,来看看:

#!/usr/bin/perl

package My::Mine;

use strict; use warnings;

sub test {
    my %h = (
        a => { z => 1},
        b => { y => 2},
    );
    return %h;
}

package main;

use strict; use warnings;

my $class = 'My::Mine';

print { $class->test }->{a}{z}, "\n";

那样不行.相反,你必须这样做:

print +{ $class->test }->{a}{z}, "\n";

现在,这很优雅(不!)见perldoc -f print.

长话短说,返回哈希的引用.

请注意,您正在构建的新匿名哈希不是免费的.从子例程返回哈希作为平面列表的成本也不是.

Answer 2

更改sub以返回哈希引用最有效,但要获得您正在寻找的功能:

{ $myclass->sub($foo) }->{key}{subkey}

这将从返回的列表中创建一个哈希引用sub,然后立即取消引用它

编辑:从您的sub而不是哈希(作为列表)返回hashref的优势主要是性能.在hashref的情况下,哈希被创建一次,然后被访问.在列表的情况下,创建哈希,然后转换为列表,然后再次创建,然后解除引用.对于小哈希,这不会花费太多时间,但对于较大的哈希,它只是运行时不必要的工作.基本上,如果您计划在某些地方将数据用作列表,并在其他地方使用哈希,则将哈希作为列表返回是可以的.但是如果你总是计划将它用作哈希值,那么返回引用会更清晰,更快.

Answer 3

只需返回一个 hashref 而不是哈希：

$myclass->sub($foo)->{key}->{subkey}