- or download this
my $a = WWW::Mechanize->new(autocheck => 1,
agent => 'Mozilla/4.0 (compatible; MSI
+E 6.0; Windows NT 5.0; T312461)',
...
'Accept' => '*/*');
$a->get($testpage, @silly_headers);
- or download this
#!perl
...
$a->success() or die "Failed to get ".($a->base).': '.$a->res()->as_st
+ring()."\n";
print "Page is ", $a->content, "\n";
- or download this
Followed link to https://www.openinvoice.com/docp/corp/main/login
Failed to get https://www.openinvoice.com/docp/corp/main/login: HTTP/1
+.0 500 (Internal Server Error) Error from proxy
...
<P>
<ADDRESS>Proxy server at flash.sugarland.unocal.com on port 8080</ADDR
+ESS>
</BODY></HTML>