# HG changeset patch # User iuc # Date 1575339230 18000 # Node ID dba489bfcd6202ff9870d32f09dd9f6440906504 # Parent dc492eb6a4fc1b8e93e2a8ed449ad21bc50a9c5c "planemo upload for repository https://github.com/galaxyproject/tools-iuc/tree/master/tools/emboss_5 commit d5dfff2cd58b094e0e4a6f8dc475de5facd9700b" diff -r dc492eb6a4fc -r dba489bfcd62 emboss_cpgplot_wrapper.pl --- a/emboss_cpgplot_wrapper.pl Mon Jan 28 14:50:36 2019 -0500 +++ b/emboss_cpgplot_wrapper.pl Mon Dec 02 21:13:50 2019 -0500 @@ -1,5 +1,5 @@ -#! /usr/bin/perl -w use strict; +use warnings; use File::Copy; my $cmd_string = join (" ",@ARGV); diff -r dc492eb6a4fc -r dba489bfcd62 emboss_infoseq_wrapper.pl --- a/emboss_infoseq_wrapper.pl Mon Jan 28 14:50:36 2019 -0500 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,9 +0,0 @@ -#! /usr/bin/perl -w -use strict; - -my $cmd_string = join (" ",@ARGV); -my $results = `$cmd_string`; -if ($ARGV[6]=~/yes/) -{ - print "Extension: html\n"; -} diff -r dc492eb6a4fc -r dba489bfcd62 emboss_multiple_outputfile_wrapper.pl --- a/emboss_multiple_outputfile_wrapper.pl Mon Jan 28 14:50:36 2019 -0500 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,19 +0,0 @@ -#! /usr/bin/perl -w -use strict; - -my $cmd_string = join (" ",@ARGV); -my $results = `$cmd_string`; -my @files = split("\n",$results); -foreach my $thisLine (@files) -{ - if ($thisLine =~ /Created /) - { - $thisLine =~ /[\w|\.]+$/; - $thisLine =$&; - print "outfile: $thisLine\n"; - } - else - { - print $thisLine,"\n"; - } -} diff -r dc492eb6a4fc -r dba489bfcd62 emboss_single_outputfile_wrapper.pl --- a/emboss_single_outputfile_wrapper.pl Mon Jan 28 14:50:36 2019 -0500 +++ b/emboss_single_outputfile_wrapper.pl Mon Dec 02 21:13:50 2019 -0500 @@ -1,5 +1,5 @@ -#! /usr/bin/perl -w use strict; +use warnings; use File::Copy; my $cmd_string = join (" ",@ARGV); diff -r dc492eb6a4fc -r dba489bfcd62 macros.xml --- a/macros.xml Mon Jan 28 14:50:36 2019 -0500 +++ b/macros.xml Mon Dec 02 21:13:50 2019 -0500 @@ -3,6 +3,7 @@ emboss + perl