kumiの一日イチ知識 perl 配列内の重複するデータを取り除く未経験でIT業界に飛び込んで、早2年半。 未だにプログラミングも出来ず、このままではマズイと思い、一念発起。 昨日よりも今日、今日よりも明日、少しでも成長できるように、「一日一知識」の習得を目指す。 perlで、配列内の重複するデータを取り除く方法。 perlだから、きっとそういうことをしてくれる関数があるはず、と思っていたが。。。ない。 検索して、ようやく見つけたのがコレ。 #!/usr/bin/perl use strict; use warnings; my @array = ('aaa', 'bbb', 'ccc', 'aaa'); my %count; @array = grep {!$count{$_}++} @array; foreach my $element (@array) { print "$element\n"; } 結果は、 aaa bbb ccc へぇ～、そっか
