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

前端之家收集整理的这篇文章主要介绍了在Perl中对字母数字哈希键进行排序?前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
给出以下哈希:
%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;
原文链接:https://www.f2er.com/Perl/172886.html

猜你在找的Perl相关文章