Select Code to Download

perl -e "use DBI; print $DBI::VERSION,"\n";
  1.609SCALAR(0x249d74)

perl -e "use DBD::Oracle; print DBD::Oracle::VERSION,"\n";"
  1.21SCALAR(0x249ef4)

  C:\Projects\NDC MAC File Load>sqlplus
  
  SQL*Plus: Release 10.2.0.3.0 - Production on Fri Apr 2 17:13:45 2010

  C:\Projects\NDC MAC File Load>Monk_DBTest.pl
   DBI connect('host=xx.xx.xx.x;sid=MySID;
...
    ERROR OCINlsEnvironmentVariableGet(OCI_NLS_CHARSET_ID)
   Check ORACLE_HOME and NLS settings etc. at 
   C:\Projects\NDC MAC File Load\Monk_DBTest.pl line 8.

#!/usr/bin/perl 
use warnings;
...
   || die "Database connection not made: $DBI::errstr";

$dbh->disconnect;