while($evalue = <DATA>){
chomp;                        # Should be chomp( $evalue );
   if($evalue < 0.001){
      print $evalue, "\n";
    }
}
close DATA;

__DATA__
1e-005
2e-090
0.00
0.67
1.0
4e-065