ハッシュのキーと値の入れ替え
ハッシュも配列だと思えばよいのか。
$ perl -MData::Dumper::Concise -e ' my $foo = {1=>'banana', 2=>'orange', 3=>'poteto'}; print Dumper($foo); my $bar = +{ reverse %$foo }; print Dumper($bar); ' { 1 => "banana", 2 => "orange", 3 => "poteto" } { banana => 1, orange => 2, poteto => 3 }