Mercurial > repos > ucsb-phylogenetics > osiris_phylogenetics

diff alignment/mview.pl @ 0:5b9a38ec4a39 draft default tip

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
First commit of old repositories
author osiris_phylogenetics <ucsb_phylogenetics@lifesci.ucsb.edu>
date Tue, 11 Mar 2014 12:19:13 -0700
parents
children
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/alignment/mview.pl	Tue Mar 11 12:19:13 2014 -0700
@@ -0,0 +1,12 @@
+#!/usr/bin/perl
+
+my $input = $ARGV[0];
+my $dna = $ARGV[1];
+
+if ($dna eq 'dna'){
+	$dna = '-DNA';
+}else{
+	$dna = '';
+}
+my $run = qx/mview -in pearson $dna -bold -coloring group -html head $input/;
+print $run;