my @mafft = ("mafft", "--auto", "--phylipout", "--reorder", "infile > outfile");
system(@mafft) == 0 or die "system @mafft failed: $?";