sub db_get {
..
..
    # fetch the rows into an array reference
    while ( $retstat = $sth->fetchrow_hashref ) {      
        push @retval, [$retstat];
    }
..
..
return @retval
}