怎么取网页的信息进行比较

wahahams

UID: 24780
帖子: 147
积分: 338
在线时间: 1 天 5 小时

1^# wahahams 发表于 2005-08-24 11:24

怎么取网页的信息进行比较

怎么取网页的信息进行比较
my $connection = IO::Socket::INET->new(Proto =>"tcp",
PeerAddr =>$host,
PeerPort =>$port) || die "Sorry! Could not connect to $host \n";

print $connection $req;
print "发送信息成功:$temp\n";
my @res=<$connection>;
print @res;
close $connection;

我想取出@res里的信息进行比较进行更详细的操作。不知道怎么处理。知道的xd指点一下

zhanying

UID: 27179
帖子: 42
积分: 96
在线时间: 2 小时

2^# zhanying 发表于 2005-08-24 22:17

你是想跟什么比较呢？还是.
你是想跟什么比较呢？还是想析出某个内容来判断内容是否正确呢？

wahahams

UID: 24780
帖子: 147
积分: 338
在线时间: 1 天 5 小时

3^# wahahams 发表于 2005-08-25 00:00

就是网页里的内容。比如里.
就是网页里的内容。比如里面有我要取的内容。我就用一种方法处理。如果没有我要的内容就换另一种处理!!!

我的表达能力这么差？

sleisilin

UID: 33913
帖子: 58
积分: 133
在线时间: 4 小时

4^# sleisilin 发表于 2005-08-25 09:17

取网页里的内容用LWP比较好吧

zhanying

UID: 27179
帖子: 42
积分: 96
在线时间: 2 小时

5^# zhanying 发表于 2005-08-28 00:27

首先你这种方法好像去不会.
首先你这种方法好像去不会网页的内容！

具体的可以参考HTTP::Request,HTTP::Response，对于网页内容的萃取主要还是依靠正则表达式，根据一些上下文和html标志进行匹配查找。

hfahe

UID: 36097
帖子: 160
积分: 368
在线时间: 1 天 11 小时

6^# hfahe 发表于 2008-05-08 11:06

LWP::Simple::get 或者LWP.
LWP::Simple::get 或者LWP::UserAgent+HTTP::Request