5.11 ハッシュを結合する
# リストとして結合 %merged = (%A, %B); # メモリ節約版 %merged = (); while ( ($k, $v) = each (%A) ) { $merged{$k} = $v; } while ( ($k, $v) = each (%B) ) { $merged{$k} = $v; }
# リストとして結合 %merged = (%A, %B); # メモリ節約版 %merged = (); while ( ($k, $v) = each (%A) ) { $merged{$k} = $v; } while ( ($k, $v) = each (%B) ) { $merged{$k} = $v; }