view emboss_cpgplot_wrapper.pl @ 17:bde3097ac0f6 draft

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

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);