I don't know off-hand how to do it "right", but you can always create a closure:

my $callback = sub {
    $object->method(@_);
};
[download]