Mercurial > repos > ucsb-phylogenetics > osiris_phylogenetics

comparison alignment/prank.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
comparison
equal deleted inserted replaced
-1:000000000000 0:5b9a38ec4a39
1 #!/usr/bin/perl
2
3 my $input = $ARGV[0];
4 my $format = $ARGV[1];
5 my $missing = $ARGV[2];
6 my $output = "output";
7 my $fparam;
8
9 if($missing eq 'yes'){
10 $fparam = "-F";
11 }else{
12 $fparam = "";
13 }
14 my $run = qx/prank -d=$input -o=$output -f=$format $fparam/;
15 print $run;