Perlで集合を扱う

Perlで集合を扱うなら，CPANモジュールのSet::Objectが良さそう．ちなみに「集合を扱う」というのは，和集合，共通部分，差集合，対称差，真部分集合の判定ぐらいの感覚で．

車輪の再発明的なものはdankogaiさんのブログに解説付きで既にあった．

割りと簡単に作れるので，CPANモジュールインストールどころかpackageを作るまでも無いだろうということで，Gistにサブルーチンのセットをメモ代わりに書いてみた．

「ハッシュのkeyを取るだけでいいじゃん」っていう箇所があるので後々修正しようかな・・・．

地味に和集合,共通部分,対称差については3つ以上の集合にも対応しておいた（絶妙にそういう機能が必要になることもあるので）

対称差については，「その要素を含む集合の数が奇数であれば，対称差の集合に入る」ようになっているので直感的に「おや？」と思うかもしれないが，3入力以上のXORと同じ振る舞いだと考えれば違和感は無くなるかも．