my $sth = $dbh->prepare("select * from $table limit 1");
$sth->execute();
print "Theres at least 1 row" if $sth->rows();