#!/usr/bin/perl
BEGIN {
    #$ENV{'ORACLE_HOME'}  = '/path/to/orahome';
    #$ENV{'LD_LIBRARY_PATH'} = '/path/to/orahome/lib';
    system("export ORACLE_HOME=/path/to/orahome");
    system("export LD_LIBRARY_PATH=/path/to/orahome/lib");
};
use DBI;