sub selectrow_array {
    my $dbh = shift;
    return $dbh->selectrow_array( @_ );
}