This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
b55959e07032b7944752ea9963be71b9a8e912e0
[perl5.git] / t / lib / warnings / regcomp
1   regcomp.c     These tests have been moved to t/re/reg_mesg.t
2                 except for those that explicitly test line numbers.
3
4 __END__
5 use warnings 'regexp';
6 $r=qr/(??{ q"\\b+" })/;
7 "a" =~ /a$r/; # warning should come from this line
8 EXPECT
9 \b+ matches null string many times in regex; marked by <-- HERE in m/\b+ <-- HERE / at - line 3.