こんな感じでハッシュを作れる。 my %foo; @foo{qw(one two three)} = ( 1, 2, 3 );展開するときはこんな感じで。 @bar = qw(one two three); print @bar;ハッシュの中身全部を別のハッシュにいれるときはこんな感じ。 %large{keys %small} = values %small;

valueに同一の値があったら、エントリがひとつになるっていうのはわかるけど、どういう基準で動いてるんだろ。 reverseの実装読めばいいか。