my %unique; my @ids = map { chop; my @fld = split /\t/; !defined( $unique{ $fld[0] } ) && $unique{ $fld[0] }++ && $fld[0]; } <$fileHandle>;
^M Free your mind!
In reply to Re: Unique elements in array
by Moron
in thread Unique elements in array
by megaurav2002
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |