diff lib/hmdb.pm @ 24:d8e2ede293a6 draft

Prod branch Updating with v.:CI_COMMIT_TAG- - Fxx
author fgiacomoni
date Thu, 19 May 2022 14:41:34 +0000
parents 2d8a310e86ce
children 8f7546d0b925
line wrap: on
line diff
--- a/lib/hmdb.pm	Thu May 19 13:43:09 2022 +0000
+++ b/lib/hmdb.pm	Thu May 19 14:41:34 2022 +0000
@@ -710,7 +710,7 @@
 			#query_mass,compound_id,compound_name,formula,monoisotopic_mass,adduct,adduct_type,adduct_m/z,"delta(ppm),",ccs_value',
     		
     		if ( $line =~ /(\d+\.\d+),(\w+),(.*),(\w+),(\d+\.\d+),([\w|n\/a|\s+]+)\s*,(\+|\-),(\d+\.\d+),(\d+),(\d*)/   ) {
-    			print "$line\n" ;
+    			#print "$line\n" ;
     		#if ( $line =~ /(\d+\.\d+),(\w+),(.*),([\w|n\/a|\s+]+)\s*,(\w+),(\d+\.\d+),(.*),(\+|\-),(\d+\.\d+),(\d+)/  ) {
     			my @entry = ("$1","$2","$3","$4","$5","$6","$7","$8","$9","$10") ;