[解決済み] Perlでハッシュを結合するには？

質問

両方のハッシュを %hash1 に結合する最良の方法は何ですか。 私は、%hash2 と %hash1 が常に一意のキーを持っていることを知っています。 また、可能であれば、1 行のコードが望ましいです。

$hash1{'1'} = 'red';
$hash1{'2'} = 'blue';
$hash2{'3'} = 'green';
$hash2{'4'} = 'yellow';

どのように解決するのですか？

クイックアンサー (TL;DR)

    hash1 = (%hash1, %hash2)

    ## or else ...

    hash1{キー %hash2} = 値 %hash2;

    ## あるいは参照で ...

    $hash_ref1 = { %$hash_ref1, %$hash_ref2 };

概要

• コンテキスト。 Perl 5.x
• 問題あり。 ユーザは2つのハッシュをマージしたい ¹ を一つの変数に統合したい。

解決方法

• 単純な変数には、上記の構文を使用します。
• 複雑なネストされた変数には Hash::Merge を使用します。

落とし穴

• 両方のハッシュに1つ以上の重複するキーがある場合の対処方法
  • (になります（例． Perl - 重複するキーを含むハッシュをマージする )
  • (例えば Perl のハッシュ: 重複するキーの扱い方と可能なペアの取得方法 )
• 空の値を持つキー・バリュー・ペアは、空でない値を持つキー・バリュー・ペアを上書きすることがありますか？
  • そもそも、空と空でない値を構成するものは何ですか? (例. undef , ゼロ、空文字列。 false , ファルシー ...)

こちらもご覧ください

• ハッシュのマージに関する PM ポスト
• PM Categorical Q&A ハッシュユニオン
• Perl クックブック 5.10. ハッシュのマージ
• websearch://perlfaq "2つのハッシュをマージする"。
• websearch://perl ハッシュのマージ
• https://metacpan.org/pod/Hash::Merge

脚注

¹ * （別名 連想配列 , 別名 辞書 )