Mercurial > repos > genouest > feelnc2asko

diff feelnc2asko.pl @ 2:d30ecf96e4cd draft default tip

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
planemo upload for repository https://github.com/genouest/galaxy-tools/tree/master/tools/feelnc2asko commit c0c2ee6f693fd83d002ed5b19ac52639790d2b6f
author genouest
date Fri, 20 Apr 2018 03:07:40 -0400
parents af75f883cab4
children
line wrap: on
line diff
--- a/feelnc2asko.pl	Thu Apr 12 10:51:05 2018 -0400
+++ b/feelnc2asko.pl	Fri Apr 20 03:07:40 2018 -0400
@@ -43,6 +43,7 @@
 
 	my $mrna= ($feat->get_tag_values('transcript_id'))[0];
   my $gene= ($feat->get_tag_values('gene_id'))[0];
+	if ($gene eq $mrna) {$mrna.=".mrna"}
 #	print STDERR "str: ", $feat->strand(), "\n";
 	if (exists($genes{$gene})) {
 		if ($genes{$gene}->start() > $feat->start()) {
@@ -96,6 +97,7 @@
 
 	my $mrna= ($feat->get_tag_values('transcript_id'))[0];
   my $gene= ($feat->get_tag_values('gene_id'))[0];
+if ($gene eq $mrna) {$mrna.=".mrna"}
 #	print STDERR "str: ", $feat->strand() , "\n";
 	if (exists($genes{$gene})) {
 		if ($genes{$gene}->start() > $feat->start()) {