On Oct 22, 2013, at 8:23 AM, Torsten Förtsch <torsten.foert...@gmx.net> wrote:

> 
> To me the problem seems to be %ENV being tied to $r->subprocess_env. So,
> neither PerlSetEnv nor SetEnv actually change the current process'
> environment. The reason for that the environment is a global resource in
> a potentially multi-threaded process.

I'm pretty sure that this is what's discussed in the docs here:

<http://perl.apache.org/docs/2.0/user/troubleshooting/troubleshooting.html#C_Libraries_Don_t_See_C__ENV__Entries_Set_by_Perl_Code>

When I do this in my startup.pl (which is included immediately after loading 
the mod_perl.so module)

I get the same error.

The entirety of my startup.pl is :

#!/usr/bin/perl
use strict;
$ENV{MOD_PERL} or die "not running under mod_perl!";
$ENV{'LD_LIBRARY_PATH'} = "/usr/lib/oracle/11.2/client64/lib";
$ENV{'ORACLE_HOME'} = "/usr/lib/oracle/11.2/client64";
$ENV{'WASIREAD'} ="Yes I was!";
1;

And it's in the environment:

DOCUMENT_ROOT --> /home/allwebfiles/static
GATEWAY_INTERFACE --> CGI/1.1
HTTPS --> on
HTTP_ACCEPT --> 
text/html,application/xhtml+xml,application/xml;q=0.9,image/webp,*/*;q=0.8
HTTP_ACCEPT_ENCODING --> gzip,deflate,sdch
HTTP_ACCEPT_LANGUAGE --> en-US,en;q=0.8
HTTP_CONNECTION --> keep-alive
HTTP_COOKIE --> __qca=P0-1946018635-1381167733063; 
SESS360e9fa4a6458358b044501f2b5b21b9=4862153113fc157562a1fc7691eecb36; 
__utma=219252696.1214622818.1382045504.1382045504.1382045504.1; 
__utmz=219252696.1382045504.1.1.utmcsr=(direct)|utmccn=(direct)|utmcmd=(none); 
CASAUTHOK=1
HTTP_HOST --> internal.pharmacy.arizona.edu
HTTP_USER_AGENT --> Mozilla/5.0 (Macintosh; Intel Mac OS X 10_8_5) 
AppleWebKit/537.36 (KHTML, like Gecko) Chrome/30.0.1599.101 Safari/537.36
LD_LIBRARY_PATH --> /usr/lib/oracle/11.2/client64/lib
MOD_PERL --> mod_perl/2.0.4
MOD_PERL_API_VERSION --> 2
ORACLE_HOME --> /usr/lib/oracle/11.2/client64
PATH --> /sbin:/usr/sbin:/bin:/usr/bin
QUERY_STRING --> 
REMOTE_ADDR --> 128.196.45.237
REMOTE_PORT --> 58217
REQUEST_METHOD --> GET
REQUEST_URI --> /card_access/envvars.pl
SCRIPT_FILENAME --> /home/allwebfiles/perl/catcard/envvars.pl
SCRIPT_NAME --> /card_access/envvars.pl
SERVER_ADDR --> 150.135.124.49
SERVER_ADMIN --> root@localhost
SERVER_NAME --> internal.pharmacy.arizona.edu
SERVER_PORT --> 443
SERVER_PROTOCOL --> HTTP/1.1
SERVER_SIGNATURE -->
Apache/2.2.15 (Red Hat) Server at internal.pharmacy.arizona.edu Port 443

SERVER_SOFTWARE --> Apache/2.2.15 (Red Hat)
SSL_TLS_SNI --> internal.pharmacy.arizona.edu
WASIREAD --> Yes I was!


This is the perl script currently running in my head:

while ($damned_oracle.so_error){head->desk();}

Next stop, recompiling DBD::Oracle.

-- 
Bruce Johnson
University of Arizona
College of Pharmacy
Information Technology Group

Institutions do not have opinions, merely customs


Reply via email to