Re^2: DBI Problem

Thanks for the links. You knew what to search for. I search for the "i can't work out... and did not find what you found.

Sounds just like my problem.

I inserted code before each of the two ExecuteQuery calls:

warn("1st call Connection-database handle: '$dbh' dsn: '$dsn'");
[download]

and

warn("2nd call Connection-database handle: '$dbh' dsn: '$dsn'");
[download]

And got the following in the error log:

Fri Sep 29 17:28:23 2017 manage_users.cgi: 1st call Connection-database handle: 'DBI::db=HASH(0x2928270)' dsn: 'dbi:mysql:database=jalamior_assoc_mgr;host=localhost' at /home/jalamior/www/httpsdocs/cgi-bin/lib/perl/manageusers.pm line 625.

Fri Sep 29 17:28:23 2017 manage_users.cgi: 2nd call connection-database handle: 'DBI::db=HASH(0x2928270)' dsn: 'dbi:mysql:database=jalamior_assoc_mgr;host=localhost' at /home/jalamior/www/httpsdocs/cgi-bin/lib/perl/manageusers.pm line 666.

(in cleanup) Can't connect to data source '' because I can't work out what driver to use (it doesn't seem to contain a 'dbi:driver:' prefix and the DBI_DRIVER env var is not set) at /usr/local/lib/perl5/site_perl/5.8.8/CGI/Session/Driver/DBI.pm line 26

I don't see where "it can't see the driver information.." So this must mean that something happens downstream in the call to executequery. Now back to square one as best I can see. I added $session->flush() with no effect.

sub ExecuteQuery
{
    my ($SQL) = @_;

    my $sth = $dbh->prepare($SQL) or die $dbh->errstr;
    $sth->execute() or die $dbh->errstr;
#    $dbh->commit or die $dbh->errstr;


#    my $sth = $dbh->prepare($SQL) || ErrorMessage($SQL);
#    $sth->execute() || ErrorMessage($SQL);
    return $sth;
    $session->flush(); 
}
[download]

Session opened for all routines in this .pm

sub OpenSession{
  my ($dbh, $sid)= @_;
  $session  = new CGI::Session("driver:MySQL", $sid, {Handle=>$dbh, Lo
+ckHandle=>$dbh});
  return $session;
}
[download]

Can you see a problem with these?

Comment on Re^2: DBI Problem Select or Download Code

Replies are listed 'Best First'.
Re^3: DBI Problem by huck (Prior) on Sep 30, 2017 at 00:07 UTC
Putting the flush after the return is less than useless i suspect the flush belongs in OpenSession It seems to be a problem in the destructor, when the database has already been closed but the session has not been flushed	[reply]
Re^4: DBI Problem by tultalk (Monk) on Sep 30, 2017 at 00:19 UTC
That flush is before the next call to execute. That was the way it was in the examples at the links. Why is it useless? It still flushes the session.	[reply]
Re^5: DBI Problem by huck (Prior) on Sep 30, 2017 at 00:29 UTC
Dont you realize that anything after a return statement doesnt get executed? Thats not even just a "perl thing" I guess you missed "Issue resolved by calling flush() before returning the object." also note Auto-flushing can be unreliable for the following reasons. Explicit flushing after key session updates is recommended.If the DBI handle goes out of scope before the session variable I tend the read the documentation before i use something written by someone else!	[reply]
Re^6: DBI Problem by tultalk (Monk) on Sep 30, 2017 at 02:38 UTC
Re^7: DBI Problem by huck (Prior) on Sep 30, 2017 at 03:21 UTC
Re^5: DBI Problem by Anonymous Monk on Sep 30, 2017 at 00:27 UTC
Have you read return? Everything after a call to return is useless	[reply]
Re^5: DBI Problem by tultalk (Monk) on Sep 30, 2017 at 00:25 UTC
Guess it does not. When I moved it ahead of return, pops up error Can't call method "flush" without a package or object reference at /home/jalamior/www/httpsdocs/cgi-bin/lib/perl/manageusers.pm line 198.	[reply]
Re^6: DBI Problem by huck (Prior) on Sep 30, 2017 at 00:33 UTC
Re^7: DBI Problem by tultalk (Monk) on Sep 30, 2017 at 01:41 UTC
Some notes below your chosen depth have not been shown here