Re^2: sub by reference - assigning to an object?

What if I want to do something like:

my $common = common_class->new();
my $parser = parser_class->new();

### this is the ugly part
$parser->{ 'getDBH' } = \&$common->getDBH;
[download]

In my original code this is more like what I was attempting.

Comment on Re^2: sub by reference - assigning to an object? Download Code

Replies are listed 'Best First'.
Re^3: sub by reference - assigning to an object? by Arunbear (Prior) on Mar 26, 2008 at 17:23 UTC
If getDBH() doesn't actually depend on $common and it's state you could do `$parser->{ 'getDBH' } = \&common_class::getDBH;` [download] otherwise you could store a wrapper to the getDBH() invocation: `$parser->{ 'getDBH' } = sub { $common->getDBH; };` [download]	[reply] [d/l] [select]