#!/usr/bin/perl

use strict;
use warnings;

# Voodoo magic to run under Oracle Perl, for DBI.
# See http://www.perlmonks.org/?node_id=657563.

BEGIN {
    die "ORACLE_HOME not set\n" unless $ENV{ORACLE_HOME};
    unless ($ENV{OrAcLePeRl}) {
        $ENV{OrAcLePeRl} = "$ENV{ORACLE_HOME}/perl";
        $ENV{PERL5LIB} = "$ENV{PERL5LIB}:$ENV{OrAcLePeRl}/lib:$ENV{OrA
+cLePeRl}/lib/site_perl";
        $ENV{LD_LIBRARY_PATH} = "$ENV{LD_LIBRARY_PATH}:$ENV{ORACLE_HOM
+E}/lib32:$ENV{ORACLE_HOME}/lib";
        exec "$ENV{OrAcLePeRl}/bin/perl", $0, @ARGV;
    }
}

use DBI;

...
[download]