view emboss_cpgplot_wrapper.pl @ 18:c2228166c035 draft

"planemo upload for repository https://github.com/galaxyproject/tools-iuc/tree/master/tools/emboss_5 commit 4812c313fd8762b11f7fd002436e3a93b4c67f00"

use strict;
use warnings;
use File::Copy;

my $cmd_string = join (" ",@ARGV);
my $results = `$cmd_string`;
my @files = split("\n",$results);
my $fileNameOut = $ARGV[14];
move($fileNameOut.".1.png",$fileNameOut);