Select Code to Download

my $all = $dbh->selectall_arrayref("
    SELECT ID, col1, col2
...
");

print "Number of rows selected: ", 0+@$all, "\n";

my ($count) = $dbh->selectrow_array("
    SELECT COUNT(*)
...
");

print "Number of rows selected: $count\n";