免费注册 查看新帖 |

Chinaunix

  平台 论坛 博客 文库
最近访问板块 发新帖
楼主: xti9er
打印 上一主题 下一主题

我的股票机 [复制链接]

论坛徽章:
95
程序设计版块每日发帖之星
日期:2015-09-05 06:20:00程序设计版块每日发帖之星
日期:2015-09-17 06:20:00程序设计版块每日发帖之星
日期:2015-09-18 06:20:002015亚冠之阿尔艾因
日期:2015-09-18 10:35:08月度论坛发贴之星
日期:2015-09-30 22:25:002015亚冠之阿尔沙巴布
日期:2015-10-03 08:57:39程序设计版块每日发帖之星
日期:2015-10-05 06:20:00每日论坛发贴之星
日期:2015-10-05 06:20:002015年亚冠纪念徽章
日期:2015-10-06 10:06:482015亚冠之塔什干棉农
日期:2015-10-19 19:43:35程序设计版块每日发帖之星
日期:2015-10-21 06:20:00每日论坛发贴之星
日期:2015-09-14 06:20:00
11 [报告]
发表于 2009-05-14 11:25 |只看该作者
原帖由 暗底 于 2009-5-14 11:20 发表
Can't locate Color/Output.pm in @INC (@INC contains: D:/Perl/site/lib D:/Perl/li
b .) at gupiao line 6.
BEGIN failed--compilation aborted at gupiao line 6.

我编译之后报上面的错, 是缺少什么啊 ...

缺少模块 Color::Output

论坛徽章:
0
12 [报告]
发表于 2009-05-14 12:25 |只看该作者
多谢 多谢 编译通了....

论坛徽章:
0
13 [报告]
发表于 2009-05-14 12:41 |只看该作者
楼主能讲讲 当你在google里搜索出来的东西如何分析啊? 或者是搜索出来的信息存在哪了?

论坛徽章:
0
14 [报告]
发表于 2009-05-14 13:13 |只看该作者
我在公司用楼主的程序取不到页面内容,是不是还需要有一些其它的设置?

论坛徽章:
0
15 [报告]
发表于 2009-05-14 13:14 |只看该作者
原帖由 暗底 于 2009-5-14 12:41 发表
楼主能讲讲 当你在google里搜索出来的东西如何分析啊? 或者是搜索出来的信息存在哪了?

变量$googled
数组@info

论坛徽章:
0
16 [报告]
发表于 2009-05-14 13:15 |只看该作者
原帖由 shaneqi 于 2009-5-14 13:13 发表
我在公司用楼主的程序取不到页面内容,是不是还需要有一些其它的设置?

看看浏览器能打开http://www.google.cn/finance/info?q=id-690158,id-684321,id-684268,id-697176,id-702734,id-684353,id-709933,id-706853,id-690427,id-697980&infotype=infoquoteall&hl=zh-CN&gl=cn不
不行就是你公司网络问题了

论坛徽章:
0
17 [报告]
发表于 2009-05-14 13:16 |只看该作者

回复 #16 hfahe 的帖子

这个用IE打开没问题,但是放到程序里面就不行了。

论坛徽章:
0
18 [报告]
发表于 2009-05-14 13:23 |只看该作者
原帖由 shaneqi 于 2009-5-14 13:16 发表
这个用IE打开没问题,但是放到程序里面就不行了。

什么问题?没有信息?

论坛徽章:
0
19 [报告]
发表于 2009-05-14 13:29 |只看该作者

回复 #18 hfahe 的帖子

恩,就是取不到值。用楼主这个程序就是显示failed。

我写了个简单的
#!c:\perl\bin
use LWP::Simple;
my $url='http://www.cpan.org/RECENT';
my $index = get( "$url" ) || die "get the page failed!\n"

也是不行。

论坛徽章:
0
20 [报告]
发表于 2009-05-14 15:28 |只看该作者

回复 #19 shaneqi 的帖子

C:\>perl -MLWP::Simple -e "getprint('http://mirror.163.com/') or die $!"
<html><title>Invalid Browser</title><body></body></html>
C:\>perl -MLWP::Simple -e "getprint('http://mirror.163ss.com/') or die $!"
500 Can't connect to mirror.163ss.com:80 (Bad hostname 'mirror.163ss.com') <URL:
http://mirror.163ss.com/>
---------------------------------
你把die后面的信息改为$! 看输出什么结果。
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

  

北京盛拓优讯信息技术有限公司. 版权所有 京ICP备16024965号-6 北京市公安局海淀分局网监中心备案编号:11010802020122 niuxiaotong@pcpop.com 17352615567
未成年举报专区
中国互联网协会会员  联系我们:huangweiwei@itpub.net
感谢所有关心和支持过ChinaUnix的朋友们 转载本站内容请注明原作者名及出处

清除 Cookies - ChinaUnix - Archiver - WAP - TOP