comparison tools/emboss_5/emboss_cpgplot_wrapper.pl @ 0:9071e359b9a3

Uploaded
author xuebing
date Fri, 09 Mar 2012 19:37:19 -0500
parents
children
comparison
equal deleted inserted replaced
-1:000000000000 0:9071e359b9a3
1 #! /usr/bin/perl -w
2 use strict;
3 use File::Copy;
4
5 my $cmd_string = join (" ",@ARGV);
6 my $results = `$cmd_string`;
7 my @files = split("\n",$results);
8 my $fileNameOut = $ARGV[14];
9 move($fileNameOut.".1.png",$fileNameOut);