root/trunk/plagger/assets/plugins/filter-entryfulltext/sixapart.pl

Revision 474 (checked in by miyagawa, 14 years ago)
Line 
1 sub handle {
2     my($self, $args) = @_;
3     $args->{content} =~ m!<meta name="generator" content="(?:http://www\.typepad\.com/|Movable Type.*?)" />!;
4 }
5
6 sub extract_body {
7     my($self, $args) = @_;
8     my $body = ($args->{content} =~ m!<div class="entry-body-text">(.*?)</div>!s)[0];
9     if ($body && ($args->{content} =~ m!<div class="entry-more-text">(.*?)</div>!s)[0]) {
10         $body .= $1;
11     }
12     $body;
13 }
Note: See TracBrowser for help on using the browser.