On Thu, 24 Dec 2009 13:46:13 -0500, John Scoles <sco...@pythian.com> wrote:
> Well here it is the long awaited 1.24 Beer version of DBD::ORACLE > > http://sctvguide.ca/images/bd_two-four.jpg How 'bout this safety: --8<--- --- t/80ora_charset.t.org 2010-01-04 17:56:49.000000000 +0100 +++ t/80ora_charset.t 2010-01-04 17:56:53.000000000 +0100 @@ -116,6 +116,8 @@ sub db_connect $p->{ora_ncharset} = $ncharset if $ncharset; my $dbh = DBI->connect($dsn, $dbuser, '', $p); + $dbh->ora_nls_parameters ()->{NLS_CHARACTERSET} =~ m/US7ASCII/ and + plan skip_all => "Database is set up as US7ASCII"; return $dbh; } -->8--- -- H.Merijn Brand http://tux.nl Perl Monger http://amsterdam.pm.org/ using & porting perl 5.6.2, 5.8.x, 5.10.x, 5.11.x on HP-UX 10.20, 11.00, 11.11, 11.23, and 11.31, OpenSuSE 10.3, 11.0, and 11.1, AIX 5.2 and 5.3. http://mirrors.develooper.com/hpux/ http://www.test-smoke.org/ http://qa.perl.org http://www.goldmark.org/jeff/stupid-disclaimers/
