Yes, I am indeed running Solaris. Is it possible to do something like this then, in order for the script to retain control?
#!/app/eol/perl/bin/perl -- # -*-Perl-*-
BEGIN {
unless ($ENV{BEGIN_BLOCK_DONE}) {
$ENV{ORACLE_HOME} = '/common/oracle/product/v8.1.6';
$ENV{LD_LIBRARY_PATH} = "$ENV{ORACLE_HOME}/lib";
$ENV{TNS_ADMIN} = '/common/oracle/env';
$ENV{BEGIN_BLOCK_DONE} = 1;
exec $0 @ARGV;
}
}
use DBI;
$dbh = DBI->connect('','scmuser/scmuser@itopstst','','Oracle');
die $DBI::errstr unless defined $dbh;
I've never run an exec in a BEGIN block... I don't know what possible caveats there may be.
Thanks,
Shendal
Update: Well, I tried it and it still doesn't work. ARGH!