Mercurial > repos > ucsb-phylogenetics > osiris_phylogenetics
comparison alignment/mview.pl @ 0:5b9a38ec4a39 draft default tip
First commit of old repositories
author | osiris_phylogenetics <ucsb_phylogenetics@lifesci.ucsb.edu> |
---|---|
date | Tue, 11 Mar 2014 12:19:13 -0700 |
parents | |
children |
comparison
equal
deleted
inserted
replaced
-1:000000000000 | 0:5b9a38ec4a39 |
---|---|
1 #!/usr/bin/perl | |
2 | |
3 my $input = $ARGV[0]; | |
4 my $dna = $ARGV[1]; | |
5 | |
6 if ($dna eq 'dna'){ | |
7 $dna = '-DNA'; | |
8 }else{ | |
9 $dna = ''; | |
10 } | |
11 my $run = qx/mview -in pearson $dna -bold -coloring group -html head $input/; | |
12 print $run; |