Some proxies also require that you send it a username/password in
order to let requests through.  You should be able to add the
required header, with something like this:

 <br>
use LWP::UserAgent;

 <br>
$ua = LWP::UserAgent-&gt;new;
 <br>
$ua-&gt;proxy(['http', 'ftp'] =&gt; '<a href="http://username:password@proxy.myorg.com'">http://username:password@proxy.myorg.com'</a>);

 <br>
$req = HTTP::Request-&gt;new('GET',&quot;<a href="http://www.perl.com">http://www.perl.com</a>&quot;);

 <br>
$res = $ua-&gt;request($req);
 <br>
print $res-&gt;decoded_content if $res-&gt;is_success;

<br>
<br>
Replace C&lt;<a href="http://proxy.myorg.com">proxy.myorg.com</a>&gt;, C&lt;username&gt; and
C&lt;password&gt; with something suitable for your site.
<br>
<br>
<br>
虽然也是这么写的,但还是行不通,Can't locate object method &quot;decoded_content&quot; via package &quot;HTTP::Headers&quot; at (eval 14)<br>
&nbsp;line 1.<br><br><div><span class="gmail_quote">On 8/7/06, <b class="gmail_sendername">卍刕卍</b> &lt;<a href="mailto:wanliyou@gmail.com">wanliyou@gmail.com</a>&gt; wrote:</span><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">
<div><span></span></div><div><span class="q">$ua-&gt;proxy(['http', 'ftp'] =&gt; '<a href="http://username:password@proxy.myorg.com%27/" target="_blank" onclick="return top.js.OpenExtLink(window,event,this)">http://username:password@proxy.myorg.com'
</a>);<br>
<br></span></div><div>
这种方法应该是行不通的,具体实现应该是用:<br>
<br>
credentials($hostport,$realm,$name,$pass)<br>
<br>
其他的好理解,$realm怎么说?<br>
<br>
&quot;$realm是realm name是remote-Server的user要求认证的一个关键字&quot;<br>
但究竟怎么设呢?</div><div><span class="e" id="q_10ce7860b10bee39_3"><br>
<br><div><span class="gmail_quote">On 8/7/06, <b class="gmail_sendername">卍刕卍</b> &lt;<a href="mailto:wanliyou@gmail.com" target="_blank" onclick="return top.js.OpenExtLink(window,event,this)">wanliyou@gmail.com</a>&gt; wrote:
</span><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">
<div><div>English DOC is enough.</div>
<div>Thanks a lot!<br><br>&nbsp;</div>
<div></div><div><span><span class="gmail_quote">On 8/7/06, <b class="gmail_sendername">Qiang (James) Li</b> &lt;<a href="mailto:shijialee@gmail.com" target="_blank" onclick="return top.js.OpenExtLink(window,event,this)">

shijialee@gmail.com</a>&gt; wrote:</span>
</span></div><div><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0px 0px 0px 0.8ex; padding-left: 1ex;"></blockquote></div><div><span>On 8/4/06, 卍刕卍 &lt;
<a href="mailto:wanliyou@gmail.com" target="_blank" onclick="return top.js.OpenExtLink(window,event,this)">wanliyou@gmail.com</a>&gt; wrote:<br>&gt;<br>&gt; 本想截取某网站页面的数据,但总是不行
<br>&gt;<br>&gt; 后想到可能要设proxy,于是看UserAgent的文档,发现$ua-&gt;proxy可以设置地址,但ID,怕ssword验证的方法是什么呢?<br><br>short answer:<br>&nbsp;&nbsp;&nbsp;&nbsp; $ua-&gt;proxy(['http', 'ftp'] =&gt; '<a href="http://username:password@proxy.myorg.com%27" target="_blank" onclick="return top.js.OpenExtLink(window,event,this)">

http://username:password@proxy.myorg.com'
</a>);<br>long answer, read: perldoc lwpcook<br><br>&gt; 另外:$ua-&gt;credentials( $netloc, $realm, $uname, $pass );具体怎么用呢?<br><br>read:<br>&nbsp;&nbsp;<a href="http://www.perlchina.org/archive/archive.php?action=archive&amp;page=15" target="_blank" onclick="return top.js.OpenExtLink(window,event,this)">


http://www.perlchina.org/archive/archive.php?action=archive&amp;page=15</a><br>or lwpcook<br><br>sorry, no chinese here and i am on 56k dial-up ;-0<br><br>Qiang<br><br></span></div><div>_______________________________________________
<br>China-pm mailing list
<br><a href="mailto:China-pm@pm.org" target="_blank" onclick="return top.js.OpenExtLink(window,event,this)">China-pm@pm.org</a><br><a href="http://mail.pm.org/mailman/listinfo/china-pm" target="_blank" onclick="return top.js.OpenExtLink(window,event,this)">

http://mail.pm.org/mailman/listinfo/china-pm</a><br></div></div><div><span><br><br clear="all"><br>-- <br>--==Best Regards From WanLi==-- 
</span></div></blockquote></div><br><br clear="all"><br></span></div><div><span class="sg">-- <br>--==Best Regards From WanLi==--
</span></div></blockquote></div><br><br clear="all"><br>-- <br>--==Best Regards From WanLi==--