给出以下哈希:
%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;