Help for this page
use strict; use warnings; ... while ( my $seq = $fastaIN->next_seq() ) { print $seq->seq, "\n"; }