use warnings;
use strict;
+use Data::Dumper;
use Maasha::Biopieces;
use Maasha::Filesys;
use Maasha::NCBI;
$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 };