my @a = ('a' . 'X' x 32768, 'a' . 'O' x 32768); #### Quantifier in {,} bigger than 32766 in regex; marked by <-- HERE in m/(.{ <-- HERE 32767}).*\0.*\1/