my @k = keys %hash; # キーのリスト
my @v = values %hash; # 値のリスト
キーのリストはどのように並ぶかは分かりませんが、values 関数で得られる値のリストは、キーの並びと対応しています。
foreach $key (keys %hash) {
print "$key => $hash{$key}\n";
}my @k = keys %hash; # キーのリスト
my @v = values %hash; # 値のリスト
キーのリストはどのように並ぶかは分かりませんが、values 関数で得られる値のリストは、キーの並びと対応しています。
foreach $key (keys %hash) {
print "$key => $hash{$key}\n";
}