Merge pull request #134 from NAL-i5K/fix-create_annotation_summaries_…

…nov21-7.pl Minor fix to create_annotation_summaries_nov21-7.pl for more specific…
NAL-i5K · Mar 27, 2024 · 64f95a3 · 64f95a3
2 parents 66cc0c3 + efe2222
commit 64f95a3
Showing 1 changed file with 9 additions and 9 deletions.
diff --git a/gff3tool/lib/auto_assignment/create_annotation_summaries_nov21-7.pl b/gff3tool/lib/auto_assignment/create_annotation_summaries_nov21-7.pl
@@ -81,31 +81,31 @@
 	my $parent="NA";
 	my $replace = "nothing entered yet";
 	foreach my $element (@col9){
-	    if ( $element =~ /ID=(.*)/ ){
+	    if ( $element =~ /^ID=(.*)/ ){
 		$id = $1;
 	    }
-	    elsif ( $element =~ /owner=(.*)/ ){
+	    elsif ( $element =~ /^owner=(.*)/ ){
 		$owner = $1;
 	    }
-	    elsif ( $element =~ /Name=(.*)/ ){
+	    elsif ( $element =~ /^Name=(.*)/ ){
 		$name = $1;
 	    }
-            elsif ( $element =~ /symbol=(.*)/ ){
+            elsif ( $element =~ /^symbol=(.*)/ ){
                 $symbol = $1;
             }
-            elsif ( $element =~ /date_last_modified=(.*)/ ){
+            elsif ( $element =~ /^date_last_modified=(.*)/ ){
                 $mod_date = $1;
             }
-            elsif ( $element =~ /Note=(.*)/ ){
+            elsif ( $element =~ /^Note=(.*)/ ){
                 $comments = $1;
             }
-	    elsif ( $element =~ /status=(.*)/ ){
+	    elsif ( $element =~ /^status=(.*)/ ){
 		$status = $1;
 	    }
-	    elsif ( $element =~ /Parent=(.*)/ ){
+	    elsif ( $element =~ /^Parent=(.*)/ ){
 		$parent = $1;
 	    }
-            elsif ( $element =~ /replace=(.*)/ ){
+            elsif ( $element =~ /^replace=(.*)/ ){
                 $replace = $1;
             }
 	}