在Perl中对字母数字哈希键进行排序？

发布时间：2020-12-15 21:16:28 所属栏目：大数据来源：网络整理

导读：给出以下哈希： %errors = ( "2013-W9 - 2013-W12" = 1,"2013-W5 - 2013-W8" = 1,"2013-W13 - 2013-W15" = 1) 我试图像这样排序(所以我可以在foreach循环中使用它)： %errors = ( "2013-W5 - 2013-W8" = 1,"2013-W9 - 2013-W12" = 1,"2013-W13 - 2013-W15" =

给出以下哈希：

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

我试图像这样排序(所以我可以在foreach循环中使用它)：

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

我已尝试排序键％错误并排序{$a< => $b)键错误％但没有成功.

我该如何解决这个问题？

解决方法

在这种情况下似乎CPAN模块排序::自然工作正常：

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

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!