The following code has an obvious bug:
use Modern::Perl;
{
package Parent;
use Moose;
sub doit { say 'doit' }
}
{
package Child;
use Moose;
extends 'Parent';
after qr/^dot/ => sub {
say 'after doit';
};
}
Child->doit;
It's clear to a *human* that we should have "after qr/^doit/". If a method
modifier/regex combination fails to match at least one method, should it warn?
Moose version 1.08
Cheers,
Ovid--
Buy the book - http://www.oreilly.com/catalog/perlhks/
Tech blog - http://blogs.perl.org/users/ovid/
Twitter - http://twitter.com/OvidPerl
Official Perl 6 Wiki - http://www.perlfoundation.org/perl6