Catalyst-view-bio-seqio is a project mainly written in Perl, it's free.

Use Bio::SeqIO as a Catalyst view.