fixed seq qual length check

[biopieces.git] / code_perl / Maasha / Blast.pm

diff --git a/code_perl/Maasha/Blast.pm b/code_perl/Maasha/Blast.pm
index 923fccd32b2d8bff6da61e744f603ff2d29f9d38..c5d70c30d8153531d1a4e1b5ab396876c5784b3d 100644 (file)
--- a/code_perl/Maasha/Blast.pm
+++ b/code_perl/Maasha/Blast.pm
@@ -28,6 +28,7 @@ package Maasha::Blast;
 # >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>><<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
 
 
+use warnings;
 use strict;
 use Storable qw( dclone );
 use Data::Dumper;