...
   my $rx = qr{uci$chr_byte|uci_};
   ...