Re: Working with Perl DBI

2012-06-13 Thread Dr.Ruud
On 2012-06-08 12:49, Dmitry Korzhevin wrote: perl check2.pl DBI::db=HASH(0x1e40ae0)->disconnect invalidates 1 active statement handle (either destroy statement handles or call finish on them before disconnecting) at check2.pl line 17. You didn't fetch all the rows. #!/usr/bin/perl -l use str

Re: Working with Perl DBI

2012-06-08 Thread John SJ Anderson
On Friday, June 8, 2012 at 6:49 AM, Dmitry Korzhevin wrote: What makes you think it's not working? Yes, you are getting this warning: > DBI::db=HASH(0x1e40ae0)->disconnect invalidates 1 active statement > > handle (either destroy statement handles or call finish on them before > disconnecting) a

Working with Perl DBI

2012-06-08 Thread Dmitry Korzhevin
Hello guys, Please help me with debugging of following script: #!/usr/bin/perl use strict; use warnings; use DBI; my $dbh = DBI->connect('DBI:mysql:exim_mx1', 'root', 'PASSWORD') || die "Could not connect to database: $DBI::errstr"; my $sth = $dbh->prepare('SELECT * FROM blackuser WHERE id=160