A Perl script to reduce alignments to unique sequences. Requires BioPerl.