A simple sequence logo program in Perl