Help for this page

Select Code to Download


  1. or download this
    Uncaught exception from user code:
            install_driver(Oracle) failed: Can't load '/usr/lib/perl5/site
    +_perl/5.8.0/i386-linux-thread-multi/auto/DBD/Oracle/Oracle.so' for mo
    +dule DBD::Oracle: libclntsh.so.8.0: cannot
     open shared object file: No such file or directory at /usr/lib/perl5/
    +5.8.0/i386-linux-thread-multi/DynaLoader.pm line 229.
    ...
     at test.pl line 6
            DBI::install_driver('DBI','Oracle') called at /usr/lib/perl5/v
    +endor_perl/5.8.0/i386-linux-thread-multi/DBI.pm line 507
            DBI::connect('DBI','coalmine','scott','tiger','Oracle') called
    + at test.pl line 6
    
  2. or download this
    #!/usr/bin/perl -w
    use DBI;
    use strict;
    ...
    if($date) { print "Database Date $date\n"; }
    else { print "Failed\n"; }
    $dbh->disconnect;