Select Code to Download

$dbh->connect(...);

...
($count)=$sth->fetchrow_array;

$dbh->disconnect;

$dbh->connect(...);

...
while(($count)=$sth->fetchrow_array) { ... }

$dbh->disconnect;