大哥大姐帮个忙

sekirayi

1^# sekirayi 发表于 2007-09-12 22:56

大哥大姐帮个忙
如何用perl提取出html代码中的body中的内容

poseidon

2^# poseidon 发表于 2007-09-13 15:35

XML::Simple
use XML::Simple;

my $file = 't.html';
my $xs1 = XML::Simple->new();

my $doc = $xs1->XMLin($file);
print $doc->{'body'} . "\n";