trying to get content from web and save to file using LWP::USERAGENT

[spewn]

a while back i used this code to pull the contents from a web page and then save to a file. worked fine...

$ua = LWP::UserAgent->new;
$ua->timeout(10);
$ua->env_proxy;
$response = $ua->get('[URL unfurl="true"]http://xyzpage.net/i.pl?a=home');[/URL]
 if ($response->is_success) {$testresponse='good';}
 else {$testresponse='bad';}

it works fine if i'm trying to call up a different website, but if i run this code from my script and the script is from xyzpage.net, it produces a bad response.

basically, i'm trying to run this from a script, and it pulls a file that is also on the same directory.

if that makes any sense.

any ideas?

- g

 

[KevinADC]

try:

print $response->code( );

and see what the actual response is from the server.

------------------------------------------
- Kevin, perl coder unexceptional!

 

[spewn]

it gives me 500.

- g

 

[spewn]

i got it. that's a regular error, a server error.

thanks for pointing me in the right direction.

it was working, but the code was on the script it was calling, and that was the error.

appreciated!

- g