diff -ur bioperl-1.5.0.orig/Bio/SearchIO/blast.pm bioperl-1.5.0/Bio/SearchIO/blast.pm
--- bioperl-1.5.0.orig/Bio/SearchIO/blast.pm	2005-06-08 17:58:55.157433280 +0200
+++ bioperl-1.5.0/Bio/SearchIO/blast.pm	2005-06-08 18:00:54.601770880 +0200
@@ -534,7 +534,7 @@
                if( /^>/ ) {
                    $self->_pushback($_);
                    last descline;
-               } elsif( /(\d+)\s+([\d\.\-eE]+)(\s+\d+)?\s*$/) {
+               } elsif( /([\d\.]+)\s+([\d\.\-eE]+)(\s+\d+)?\s*$/) {
 		   # the last match is for gapped BLAST output
 		   # which will report the number of HSPs for the Hit
                    my ($score, $evalue) = ($1, $2);