[Bioperl-l] fasta file parser

[Sendu Bala]

Sendu Bala wrote:
> ste.ghi at libero.it wrote:
>> #Load LIST content in an array; avoids duplicates
[snip]
> @list = <LIST>;
> %unique = map { chomp($_) => 1 } @list;

Oops, my chomp usage is wrong. This'll work better:

@list = <LIST>;
chomp(@list);
%unique = map { $_ => 1 } grep { /\S/ } @list;