removed debug message

[biopieces.git] / bp_bin / read_soft

diff --git a/bp_bin/read_soft b/bp_bin/read_soft
index dfbf9f387a77683023180284d0b61979ef31eb88..10ae8c1bb405914db2d0c83c5e6a343de7a79ca1 100755 (executable)
--- a/bp_bin/read_soft
+++ b/bp_bin/read_soft
@@ -1,4 +1,4 @@
-#!/usr/bin/env perl -w
+#!/usr/bin/env perl
 
 # Copyright (C) 2007-2009 Martin A. Hansen.
 
@@ -27,7 +27,9 @@
 # >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>><<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
 
 
+use warnings;
 use strict;
+use Data::Dumper;
 use Maasha::Biopieces;
 use Maasha::Filesys;
 use Maasha::NCBI;
@@ -62,6 +64,8 @@ foreach $file ( @{ $options->{ "data_in" } } )
 
     $soft_index = Maasha::NCBI::soft_index_file( $file );
 
+    # print STDERR Dumper( $soft_index ) if $options->{ "verbose" };
+
     $fh         = Maasha::Filesys::file_read_open( $file );
 
     @platforms  = grep { $_->{ "SECTION" } =~ /PLATFORM/ } @{ $soft_index };