my $msg = $dbh->func( 'plsql_errstr' );

        die $dbh->errstr if ! defined $msg;
        die $msg if $msg;