diff rapsodyn/extractseq.pl @ 9:0e7c6fe60646 draft

Uploaded
author mcharles
date Mon, 20 Oct 2014 05:58:31 -0400
parents 3f7b0788a1c4
children 0a6c1cfe4dc8
line wrap: on
line diff
--- a/rapsodyn/extractseq.pl	Fri Oct 10 07:05:36 2014 -0400
+++ b/rapsodyn/extractseq.pl	Mon Oct 20 05:58:31 2014 -0400
@@ -89,7 +89,7 @@
 		}
 		$variant{"desc"}=$descriptor;
 		
-		print ">",$variant{"ref"},"_",$descriptor,"\n",$variant{"SEQ"},"\n";
+		print ">",$variant{"ref"},"_",$descriptor,"_","\n",$variant{"SEQ"},"\n";