########### snip
eval( require( 'Parser/' . $parser_name . '.pm'));
$self->{ 'parser' }->{ $parser_name } = $parser_name->new();

####This is the problematic line:
$self->{ 'parser' }->{ $parser_name }->getDBH = \&getDBH;