perl - 如何按照添加到散列的顺序打印散列的元素

Question

如何按照添加到散列的顺序打印散列的键/值对。

例如:

%hash = ("a", "1", "b", "2", "c", "3");
while (($key, $value) = each %hash) {
   print "$key", "$value\n";
}

以上结果如下:

c3
a1
b2

我正在寻找一种打印以下内容的方法:

a1
b2
c3

提前致谢!

Answer 1

How do you print the key/value pairs of a hash, in the order they appear in the hash.

您使用的代码正是这样做的。 c3, a1, b2 是元素出现在 hash中的顺序那时候。

你真正想要做的是按照插入的顺序打印它们。为此，您需要跟踪元素插入的顺序，或者您必须使用散列以外的其他东西，例如上述 Tie::IxHash和 Tie::Hash::Indexed .