PerlSetVar ORACLE_SID production #### if( $ENV{'MOD_PERL'} } ) { require 'Apache2::ServerUtil' ; my $s = Apache2::ServerUtil->new ; $ENV{'ORACLE_SID'} ||= $s->dir_config('ORACLE_SID') ; }