my $dbrecord = ClassDBI_Table1->retrieve ( 1 ); # ClassDBI_Table1 is of base Class::DBI::mysql $r->pnotes('INFO_FOR_LATER', \$dbrecord );
Should be
$r->pnotes('INFO_FOR_LATER', $dbrecord );
my $existing_dbrecord = $r->pnotes('INFO_FOR_LATER'); $r->log_error ( "INFO_FOR_LATER = " . $existing_dbrecord->Name );
Should be
$r->log_error ( "INFO_FOR_LATER = " . $existing_dbrecord->Name() );
I've tried various iterations of the code
I'm guessing you just didn't try the right combination.
- Perrin
-- Reporting bugs: http://perl.apache.org/bugs/ Mail list info: http://perl.apache.org/maillist/modperl.html