On Tuesday 04 April 2006 01:37, John Russell wrote: > sub authenticate { > > my $r = shift; > > my $dbh; > > $dbh = DBI->connect("dbi:Oracle:XE", "WEB_LOGIN", "nnnn", > {RaiseError => 0, AutoCommit => 1, PrintError => 0}) > || return "Error connecting.\n$DBI::errstr\n"; > } > > $r->pnotes(DBH => $dbh); > }
does it make a difference if $r->pnotes(DBH => $dbh); is changed into $r->pnotes->{DBH} = $dbh; ? Torsten
pgpnMIStslhzY.pgp
Description: PGP signature