在函数调用的同一行获取哈希键/值

这是重现问题的代码：

sub hello { return (h => 1, n => 1); }
print join ", ", values hello();

我收到错误：

arg 1 到值的类型必须是散列 （不是子程序入口）在 - 第 4 行， 靠近 ”）;”执行 - 由于中止 到编译错误。

我知道我可以将调用和打印分成两行：

sub hello { return (h => 1, n => 1); }
my %hash = hello();
print join ", ", values %hash;

但我不想那样做。有没有某种方法可以在一行中完成此操作，这样我就不必一直创建临时变量？

您可以使用哈希引用：

sub hello { return {h => 1, n => 1}; }
print join ", ", values %{hello()};

但除此之外，没有。 Perl 可以在标量或列表上下文中解释子例程的返回值，但没有在散列上下文中返回值的概念。

Update: 这也有效

sub hello { return (h => 1, n => 1); }
print join ", ", values %{{hello()}};

内在{}将输出转换为hello()从列表到哈希引用。 外层%{}取消引用哈希。

(Does %{{}}}算作一个伪运算符?)