This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Remove ‘Useless use of "re" pragma’ warning
authorFather Chrysostomos <sprout@cpan.org>
Sat, 4 Feb 2012 07:32:32 +0000 (23:32 -0800)
committerFather Chrysostomos <sprout@cpan.org>
Sat, 4 Feb 2012 07:32:32 +0000 (23:32 -0800)
commit141c2cada6c8bc0ed7ed36f1c48ed8f99d0f0c27
tree1a70d49bb77a50e75073e619fd54944a9f0a50d7
parentbecd10489a5ee10009a344e976dd06aa18ff13be
Remove ‘Useless use of "re" pragma’ warning

It’s wrong.

$ ./perl -Ilib -le 'use re; print re::regmust(qr/foo/)'
Useless use of "re" pragma at -e line 1.
foo

Useless, eh?  OK, then:

$ ./perl -Ilib -le 'print re::regmust(qr/foo/)'
Undefined subroutine &re::regmust called at -e line 1.
ext/re/re.pm
ext/re/t/re.t