adding bzip2 support in ruby

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

diff --git a/code_perl/Maasha/Common.pm b/code_perl/Maasha/Common.pm
index 64c9182cde053a7af648eca3ac2f306d41440d39..079587ba4eb013f0b3d9f5179edb3efc4c204d24 100644 (file)
--- a/code_perl/Maasha/Common.pm
+++ b/code_perl/Maasha/Common.pm
@@ -180,7 +180,7 @@ sub error
     $file_max    = length "File";
     $line_max    = length "Line";
 
-    if ( $line =~ /^ at (.+) line (\d+)$/ )
+    if ( $line =~ /^ at (.+) line (\d+)\.?$/ )
     {
         $file    = $1;
         $line_no = $2;
@@ -736,7 +736,7 @@ sub str_analyze
 
     @composition = Maasha::Common::str_analyze_C( $str ); 
 
-    for ( $i = 32; $i < 128; $i++ ) {          # Only include printable chars
+    for ( $i = 32; $i <= 126; $i++ ) {          # Only include printable chars
         $hash{ chr $i } = $composition[ $i ]
     }