substr( $self->seq, 20, 15 ) =~ tr/178/22x/;