Perl散列表能否按指定顺序排列？

[字与码]

按照书上说（实际上也是这样），perl的散列表的每一项的顺序并不是可期望的，而是由散列内部的存储结构决定。
可是如果一定要按顺序又怎样？而且顺序最好是按代码中的顺序，而不是用sort出来的顺序。

有没有什么解决方式？

[zgxbliss]

hash本身就是无序的,如果一定要按加入顺序遍历的话,可以改用数组,这样能解决顺序遍历的问题,但是检查某个键是否存在就不如hash方便了.再不然就在使用hash的基础上再用一个数组保存hash中的键.这样就能达到要求了.

[Yujlyjl]

先将主键排列
my $keys = sort {$a<=>$b} keys($hash);
fornext $key into $keys
{
......
}