作者wafall (do your best,no words)
看板perl
标题[问题] 请问怎麽取得网页连结的时间+判断更新与否
时间Mon Apr 16 20:41:49 2007
#!/usr/bin/perl
use strict;
use LWP;
my $browser= LWP::UserAgent->new;
my $url='
http://www.cpan.org/RECENT.html';
my $response=$browser->get ($url);
die "Can't get $url -- ", $response->status_line
unless $response->is_success;
my $html = $response->content;
while( $html =~ m/<A HREF=\"(.*?)\"/g ) {
print URI->new_abs( $1, $response->base ) ,"\n";
}
这个程式只有把网页目录下的所有连结抓回来而已>"<
请问一下，如果想自动检查上述网站的各网页更新时间，以及是否连接都正确，
1.如何取得各网页的上传时间？
2.如何判断网页是否更新？
请各位高手帮忙 感激m(_ _)m
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 59.104.109.2
1F：→ wafall:我知道检查网页连结是否正确，要用网页状态码做了! 04/17 21:45