访问和打印数组哈希

时间:2011-02-18 04:38:36

标签: perl perl-hash

我有一个关于如何打印哈希的问题:

@language(1,2,3);
for my $i (0 .. $#language)
{
  $statement = $db->selectall_arrayref(
    "select word from words
    left outer join language
    on words.languageId = language.languageId
    where words.languageId = $language;"
  );
  %words=((@language[$language])=> {@$statement});
}
return %words;

如何帮助打印哈希

我试过了:

foreach my $key(keys %newwordsList)
{
    print "Dozzzz: " . $key . "\n";

    for my $ind(0 .. @{$newwordsList{$key}}-1){
        print $newwordsList{$key}[$ind] . "\n";
    }
} 

但我一无所获。

我有一个问题:哈希是否是一个连续的顺序 我的意思是$key,因为我试试你打印$keys 它应该打印123但打印出132

出了什么问题?

1 个答案:

答案 0 :(得分:0)

哈希表不保留插入顺序。您需要使用不同的数据结构,可能是Tie :: IxHash。

相关问题