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


Reply via email to