本文介绍了在Perl中对字母数字哈希键进行排序?的处理方法,对大家解决问题具有一定的参考价值,需要的朋友们下面随着小编来一起学习吧!

问题描述

给出以下哈希值:

%errors = (
    "2013-W9 -> 2013-W12" => 1,
    "2013-W5 -> 2013-W8" => 1,
    "2013-W13 -> 2013-W15" => 1
)

我正在尝试像这样对其进行排序(以便可以在foreach循环中使用它):

I'm trying to sort it like this (so I can use it in a foreach loop):

%errors = (
    "2013-W5 -> 2013-W8" => 1,
    "2013-W9 -> 2013-W12" => 1,
    "2013-W13 -> 2013-W15" => 1
)

我尝试sort keys %errorssort{$a <=> $b) keys %errors都没有成功.

如何解决此问题?

推荐答案

在这种情况下,似乎CPAN模块Sort::Naturally可以正常工作:

It seems that in this case the CPAN module Sort::Naturally works fine:

use Sort::Naturally qw(nsort);
say $_ for nsort keys %errors;

这篇关于在Perl中对字母数字哈希键进行排序?的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持!

07-31 03:43