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