Code suggestion for LIBWWW_PERL env var
Ralph Vinciguerra (rlv@riker.read.tasc.com)
Wed, 4 Jan 1995 14:05:26 +0500
I suggest this alternate implementation in places like the start of script
get (POST & HEAD..):
if($libloc = $ENV{'LIBWWW_PERL'})
{
foreach(split(/:/,$libloc)) { unshift(@INC, $_); }
}
This allows something like:
setenv LIBWWW_PERL /usr/local/gnu/lib:/usr/local/users/lib:/home/rlv/lib
Your current code would lead one to believe that I could do this:
setenv LIBWWW_PERL "/usr/local/gnu/lib /usr/local/users/lib /home/rlv/lib"
but the entire string is unshifted into @INC as a single string and
we loose the multiple paths.
The new scheme works like the usual PATH stuff.
I hit this because my sys admin hadn't installed the sys/socket.ph correctly and
I had to get the scripts to see my own version in my home directory.