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

Attachment: pgpnMIStslhzY.pgp
Description: PGP signature

Reply via email to