Convert NEXUS files into fasta/mega format W. Fischer readnexus readnexus seqlab readnexus perl "readnexus" 0 seq Nexus File perl " $value" 2 nexus_file perl 1 fastafile *.fasta readseq_ok_alig perl 1 megfile *.meg outformat Output format perl ($value)? " $value" : "" -f 1 -f fasta (-f) -m mega (-m)