Re: ANNOUNCE: DBD::Oracle 1.24 Release Candidate 1

On Thu, 24 Dec 2009 13:46:13 -0500, John Scoles <[email protected]>
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/