satomixx/file3.txt

Created February 6, 2014 07:23

Star () You must be signed in to star a gist
Fork () You must be signed in to fork a gist

Learn more about clone URLs
Clone this repository at <script src="https://gist.github.com/satomixx/8839670.js"></script>
Save satomixx/8839670 to your computer and use it in GitHub Desktop.

Download ZIP

Perlで2つの配列の要素から重複を排除する、重複した要素だけ抽出する ref: http://qiita.com/mugyuu/items/f5d825c5214a7848305a

Raw

	hoge# perl make_array_unique .pl
	6
	2
	8
	4
	10

Raw

make_array_unique.pl

@unique = grep { $count{$_} >= 2 } keys %count; # 要素数が２より小さいもののみ抽出

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment