in reply to perl script

Cross-posted to perl scriot for fasta

In Section Seekers of Perl Wisdom