Mercurial > repos > devteam > emboss_5
annotate emboss_cpgplot_wrapper.pl @ 12:ace31bbde4c0 draft
planemo upload for repository https://github.com/galaxyproject/tools-iuc/tree/master/tools/emboss_5 commit 9d484642914b581ce35f254466b849d3c4c2c06c
author | iuc |
---|---|
date | Thu, 23 Feb 2017 09:43:32 -0500 |
parents | 9b98d3d903c6 |
children | bde3097ac0f6 |
rev | line source |
---|---|
10
9b98d3d903c6
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/emboss_5 commit fc158bfe5f5927dc199321a2cf43310373cbc8ba
devteam
parents:
diff
changeset
|
1 #! /usr/bin/perl -w |
9b98d3d903c6
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/emboss_5 commit fc158bfe5f5927dc199321a2cf43310373cbc8ba
devteam
parents:
diff
changeset
|
2 use strict; |
9b98d3d903c6
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/emboss_5 commit fc158bfe5f5927dc199321a2cf43310373cbc8ba
devteam
parents:
diff
changeset
|
3 use File::Copy; |
9b98d3d903c6
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/emboss_5 commit fc158bfe5f5927dc199321a2cf43310373cbc8ba
devteam
parents:
diff
changeset
|
4 |
9b98d3d903c6
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/emboss_5 commit fc158bfe5f5927dc199321a2cf43310373cbc8ba
devteam
parents:
diff
changeset
|
5 my $cmd_string = join (" ",@ARGV); |
9b98d3d903c6
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/emboss_5 commit fc158bfe5f5927dc199321a2cf43310373cbc8ba
devteam
parents:
diff
changeset
|
6 my $results = `$cmd_string`; |
9b98d3d903c6
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/emboss_5 commit fc158bfe5f5927dc199321a2cf43310373cbc8ba
devteam
parents:
diff
changeset
|
7 my @files = split("\n",$results); |
9b98d3d903c6
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/emboss_5 commit fc158bfe5f5927dc199321a2cf43310373cbc8ba
devteam
parents:
diff
changeset
|
8 my $fileNameOut = $ARGV[14]; |
9b98d3d903c6
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/emboss_5 commit fc158bfe5f5927dc199321a2cf43310373cbc8ba
devteam
parents:
diff
changeset
|
9 move($fileNameOut.".1.png",$fileNameOut); |