This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Move the special-case logic for $qr_embed_thr to regexp_qr_embed_thr.t