use LWP::Simple; use HTTP::Request; use HTML::TreeBuilder 3.0; use Template::Extract; use Data::Dumper; foreach my $urls( 'http://uptimemgr/saved/1358381265931.htm', 'http://uptimemgr/saved/1375561135115.htm', 'http://uptimemgr/saved/1388446037003.htm' ) { getprint $urls =~ m{<div class=ipm8rpt>([^<]*)</div>}i || die;
In reply to HTTP::Request pipe through regex by zogness
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |