my $begin="开头的特征字符"; my $end="结束的特征字符"; use LWP::Simple; my $url="网页的地址"; my $doc=get($url); $doc=~m/$begin(.*)$end/is; print $1;#此时的$1可能就是你需要的内容了 |
perl 获取网页内容
最新推荐文章于 2021-05-31 19:01:12 发布
my $begin="开头的特征字符"; my $end="结束的特征字符"; use LWP::Simple; my $url="网页的地址"; my $doc=get($url); $doc=~m/$begin(.*)$end/is; print $1;#此时的$1可能就是你需要的内容了 |