On Thu, Oct 21, 2004 at 09:07:01AM +0200, Steffen Goeldner wrote:
> Tim Bunce wrote:
> 
> t\21nchar............... Database and client versions and character sets:
> Database 8.1.7.2.1 CHAR set is WE8ISO8859P1 (Non-Unicode), NCHAR set is 
> WE8ISO8859P1 (Non-Unicode)
> Client 8.1.7.0 NLS_LANG is 'AMERICAN_AMERICA.WE8ISO8859P1', NLS_NCHAR is 
> '<unset>'

> t\25plsql...............ok 65/83Can't call method "bind_columns" on an 
> undefined value at t\25plsql.t line 319.
> t\25plsql...............dubious
>         Test returned status 255 (wstat 65280, 0xff00)

Looks like the same (interesting) problem as Honza.
What message do you get after applying the appended patch?

Tim.


Index: t/25plsql.t
===================================================================
--- t/25plsql.t (revision 506)
+++ t/25plsql.t (working copy)
@@ -315,7 +315,8 @@
        END;
     }) or skip("Can't create a function ($DBI::errstr)", 16);
     my $sth = $dbh->prepare(qq{SELECT $func_name(?, ?) FROM DUAL});
-    ok(0, $sth);
+    ok(0, $sth, "Can't prepare select from function ($DBI::errstr)");
+    skip("Can't select from function ($DBI::errstr)", 15) unless $sth;
     ok(0, $sth->bind_columns(\my $returnVal));
     for (1..2) {
        ok(0, $sth->bind_param(1, "foo", { ora_csform => SQLCS_NCHAR }));

Reply via email to