Re: MySQL count with DBI


Perl Monk, Perl Meditation
	PerlMonks

Re: MySQL count with DBI

by smitz (Chaplain)

on May 09, 2003 at 12:05 UTC ( [id://256833]=note: print w/replies, xml )

Need Help??

in reply to MySQL count with DBI

Yeah I had an idea once, a combination Hat and Shoe, but the backers dropped out and I
lost EVERYTHING. Anyway, does this answer your non-question?

#!perl -w
use strict;
use DBI;

my $dbh = DBI->connect('DBI:mysql:my_database', 'my_username', 'my_pas
+sword')
    or die "Couldn't open database: $DBI::errstr; stopped";

# Prepare the SQL query for execution
my $sth = $dbh->prepare(<<SQL) or die "Couldn't prepare statement: $DB
+I::errstr; stopped";
SELECT COUNT(*) FROM table
SQL

# Execute the query
$sth->execute() or die "Couldn't execute statement: $DBI::errstr; stop
+ped";

#print result
my ($count) = $sth->fetchrow_array();
print "Found $count results\n";
[download]