added duplicate_record biopiece

[biopieces.git] / bp_bin / compute

diff --git a/bp_bin/compute b/bp_bin/compute
index 52ef66d0b2a7c1a2539bad8814bd641523c4d903..1c5c25862526d8e24c301085fb3226e567155da8 100755 (executable)
--- a/bp_bin/compute
+++ b/bp_bin/compute
@@ -65,7 +65,7 @@ while ( $record = Maasha::Biopieces::get_record( $in ) )
         map { $eval_val =~ s/\Q$_\E/$record->{ $_ }/g } @keys;
 
 
-        if ( $eval_val !~ /\s/)
+        if ( $eval_val !~ /\s+[+\-\*]{1,2}\s+/)
         {
             $record->{ $eval_key } = $eval_val;
         }