X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=bp_bin%2Funiq_seq;h=fc3e43db9ab25f940b80d5e5a9b8413b30daffb9;hb=48bea5c28b89dc5586d0bddb338ccd6ba23aa1f9;hp=a261875b4de4b33742a6b323f016ce23fd5694c8;hpb=c78c50d9180b8242c2b74b8dee4cc3788f67bd59;p=biopieces.git

diff --git a/bp_bin/uniq_seq b/bp_bin/uniq_seq
index a261875..fc3e43d 100755
--- a/bp_bin/uniq_seq
+++ b/bp_bin/uniq_seq
@@ -50,7 +50,7 @@ $out = Maasha::Biopieces::write_stream( $options->{ "stream_out" } );
 while ( $record = Maasha::Biopieces::get_record( $in ) ) 
 {
     if ( $record->{ 'SEQ' } ) {
-        $hash{ $record->{ 'SEQ' } }++;
+        $hash{ uc $record->{ 'SEQ' } }++;
     } else {
         Maasha::Biopieces::put_record( $record, $out );
     }