Re: GET works, but not from user httpd

Bill Moninger (moninger@fsl.noaa.gov)
Wed, 21 Feb 96 16:01:25 GMT


>In message <9602202151.AA22530@mtn.fsl.noaa.gov>, Bill Moninger writes:
>>     foreach $xURL (@myURLs) {
>>         if ($xURL) {
>>             #I sure as hell don't know why I need to do this vvvvvvvvvv
>>             $_=$xURL;     #####################
>>             /(.*)/;       #####################
>>             $myURL=$1;    #####################
>
>Does this has anything to do with tainting (you use setuid/setgid
>scripts or the -T flag to perl)?
>
>>             #but it has something to do with assoc. arrays ^^^^^^^^^^
>>             #print "myURL is |$myURL|<br>\n";
>>             $request = new HTTP::Request('GET',"$myURL" );
>>             $response = $ua->request($request);
>>             if ($response->isError) {
>>                 $msg= $response->asString;
>>                 $msg =~ /Message: (.*)\n/;
>>                 push (@bads,$1);
>>             }
>>         }
>>     }

Yes,  I do run with the -T flag, and the instructions for 'un-tainting' a
variable gave me the idea. So, I tried it without, and ...

GOOD THINKING, GISLE!  When I try without the taint flag, things work fine
(even without the 'untainting' code (hash marked) above).  This sounds more
like a bug in perl (5.001m) than in libwww-perl.  

Many thanks again.

-Bill