南方Linux论坛   首页 | 行业 | 下载 | Blog | 桌面应用 | 数据库 | 电子商务 | 文摘 | 网络服务 | 开源 | 系统管理 | 内核代码 | 教程

返回   南方Linux论坛 > Linux 高级应用讨论区 > perl | php | python 脚本程序开发
注册账号 Blog 论坛帮助 会员列表 日历事件 搜索 今日新帖 标记讨论区已读

发表新主题 回复
 
主题工具 显示模式
旧 2006-08-16, 02:09 AM   #1
TOM
级别:10 | 在线时长:143小时 | 升级还需:22小时级别:10 | 在线时长:143小时 | 升级还需:22小时级别:10 | 在线时长:143小时 | 升级还需:22小时级别:10 | 在线时长:143小时 | 升级还需:22小时
论坛义工
 
注册日期: 2006-07-05
帖子: 477
精华: 0
现金: 1632 金币
资产: 1632 金币
声望: 16 TOM 正向着好的方向发展
微笑 LWP::SIMPLE與代理伺服器(Proxy Server)的問題

最近利用了LWP::SIMPLE模块写了一些 Perl程序,可以连接远程计算机 (remote computer)收集数据,例如这个 NCBI BLAST 程序。但是它们在新的办工室里未能正常工作,为什么呢?查看后,发觉原来是在办工室的网络里,是用了代理服务器 (proxy server)。为了解决这个问题,我用了一个很简单的方法,就是为 LWP::SIMPLE设定一个 useragent变量 (variable),以下Perl程序的语法:
use LWP::Simple qw($ua get);
$ua->proxy('http','http://your_proxy_server_domain : port_no');
加了这两行后,$ua变量就已被设定。在之后的程序行里,当LWP::SIMPLE模块的有关子程序被呼叫的话,计算机就会通过代理服务器连接到远程计算机,传回结果,例如:
my $result = get ('http://remote_computer_domain/remote_page');
除了以上方法,你亦可以透过预设”http_proxy”这个环境变量(environment variable)来达到相同目的。


譯者/作者:andrew

此帖于 2006-08-16 02:11 AM 被 TOM 编辑.
TOM 当前离线  
回复时引用此帖
发表新主题 回复


当前查看此主题的会员: 1 (0 位会员和 1 位游客)
 
主题工具
显示模式

发帖规则
不可以发表新主题
不可以回复主题
不可以上传附件
不可以编辑您的帖子

论坛启用 BB 代码
论坛启用 表情符号
论坛启用 [IMG] 代码
论坛禁用 HTML 代码


所有时间均为北京时间。现在的时间是 05:58 AM


vBulletin 3.6.8 Powered by 南方Linux联盟
版权所有 ©2004 - 2009, bbs.linuxunion.net