Select Code to Download

@row_ary = $dbh->selectrow_array($statement);
@row_ary = $dbh->selectrow_array($statement, \%attr);
@row_ary = $dbh->selectrow_array($statement, \%attr, @bind_values);

use Try::Tiny;
$dbh->{AutoCommit} = 0;  # enable transactions, if possible
...
    eval { $dbh->rollback };
    # add other application on-error-clean-up code here
};

$dbh->{AutoCommit} = 0;  # enable transactions, if possible
$dbh->{RaiseError} = 1;
...
    eval { $dbh->rollback };
    # add other application on-error-clean-up code here
};