##
ORACLE_HOME=... LD_LIBRARY_PATH=... perl ...
##
##
BEGIN {
my $oracle_home = "...";
my $ld_library_path = "...";
if ($ENV{ORACLE_HOME} ne $oracle_home
|| $ENV{LD_LIBRARY_PATH} ne $ld_library_path
) {
$ENV{ORACLE_HOME} = "...";
$ENV{LD_LIBRARY_PATH} = "...";
exec { $^X } $^X, $0, @ARGV;
}
}