読者です 読者をやめる 読者になる 読者になる

IT練習ノート

IT関連で調べたこと(実際は嵌ったこと)を書いています。

ハッシュのキーと値の入れ替え

ハッシュも配列だと思えばよいのか。

$ 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
}