如何在Perl中以惯用方式访问单个元素哈希的第一个元素?

前端之家收集整理的这篇文章主要介绍了如何在Perl中以惯用方式访问单个元素哈希的第一个元素?前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
我有脚本使用DBI的fetchall_hashref()获取一些数据.

通常它返回一个哈希引用,如下所示:

{ 1 => { id => 1 } }

但是,我只对散列中第一个项的值感兴趣,这是特定列的最大值.我知道Perl哈希不是有序的,但幸运的是这个特定的查询总是返回1或0条记录(因为这是一个MAX()查询).

但是目前用于实现这一目标的代码真的很难看:

$results->{(keys %{$results})[0]}->{'id'};

是否有更优雅的方式来激活它? (不使用CPAN模块)

澄清

我从内部使用的数据访问层获取哈希值.一切都通过fetchall_hashref()返回.我没有调用fetchall_hashref()本身,它只是如何在内部实现数据访问功能,所以我被告知.我是返回数据的消费者,它恰好是哈希的形式.我正在寻找一种更简洁的方法(如果存在)来访问单个返回值查询的结果

解决方法

您可以取消引用%$结果中第一个值的ID键:

(values %$results)[0]->{id};

通常,自the ordering of values returned keys or values can be different even between runs on the same machine using the same perl以来这不会是well defined,但是因为你说%$results只能包含一个或零个元素,所以这是一个有效的方法.

猜你在找的Perl相关文章