my @array = ('l', 'e', 'i', 'l', 'a'); my %count; @array = grep( !$count{$_}++, @array ) ; print @array; ⇒出力は『leia』 なんとなーくやってる事は解るけれど、 見ただけだとちゃんと理解できない。。 grepと !$count{$_}++ の意味がよく解らないの…