Select Code to Download

while ($array_ref_partial = $sth2->fetchrow_arrayref) {
    warn join(' | ', @$array_ref_partial), "\n";
    push @rows_partial, $array_ref_partial;
    push @partial_famids, $array_ref_partial->[1];
}

push @rows_partial, [ @$array_ref_partial ];