my $rl = $dbh->selectall_arrayref( $sql );
print ref $rl, "\n";