#!perl

use DBI;

$dsn = "dbi:mysqlPP:database=test;host=xxx.xxx.x.x";

$dbh = DBI->connect($dsn, "my_username", "my_password");

$drh = DBI->install_driver("mysqlPP");

$sth = $dbh->prepare("SELECT * FROM foo WHERE bla");
$sth->execute;
$numRows = $sth->rows;
$numFields = $sth->{'NUM_OF_FIELDS'};
$sth->finish;