Select Code to Download

$sth->selectrow_arrayref(...)

$dbh->selectrow_arrayref($sth, ...)

use strict;
use warnings;
...
# ----------------------------------------

1;