5.6 ハッシュを出力する

# each関数を使用
while ( ($k, $v) = each %hash ) {
  print "$k => $v\n";
}

# map関数を使用
print map { "$_ => $hash{$_}\n" } keys %hash;

# ハッシュをリストに展開1
print "@{ [ %hash ]}\n";

# ハッシュをリストに展開2
{
  my @temp = %hash;
  print "@temp\n";
}

# Dumpvalueモジュールを使用
use Dumpvalue;
$dumper = Dumpvalue->new;
$dumper->dumpValue(\%hash);