xref: /openbsd/gnu/usr.bin/perl/t/re/regexp_qr_embed.t (revision d415bd75) 
1#!./perl
2
3$qr = 1;
4$qr_embed = 1;
5for $file ('./re/regexp.t', './t/re/regexp.t', ':re:regexp.t') {
6    if (-r $file) {
7	do $file or die $@;
8	exit;
9    }
10}
11die "Cannot find ./re/regexp.t or ./t/re/regexp.t\n";
12