X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=bp_bin%2Fread_soft;h=10ae8c1bb405914db2d0c83c5e6a343de7a79ca1;hb=b04ea01fc94d50b0f60b22ff8be7b21ce2c36987;hp=9e44f59ef355885cd6366aac6a84553c86e020ec;hpb=5aed4676ad1bf35abbade6215ac90ee591e6d8fe;p=biopieces.git diff --git a/bp_bin/read_soft b/bp_bin/read_soft index 9e44f59..10ae8c1 100755 --- a/bp_bin/read_soft +++ b/bp_bin/read_soft @@ -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 };