Re: Methods, within a class, pass callbacks; how to deal with that in derived class?

Probably with Class::Method::Modifiers?

package Foo;
use parent 'CAM::PDF';
use Class::Method::Modifiers;

around 'setObjNum' => sub {
    my $orig = shift;
    my $ret = $orig->(@_);
    # frob…
    return ...;
};
[download]

«The Crux of the Biscuit is the Apostrophe»

Comment on Re: Methods, within a class, pass callbacks; how to deal with that in derived class? Download Code