Perl HTML::Featureで重要な部分を抽出するモジュール

wget
http://search.cpan.org/CPAN/authors/id/M/MI/MIKI/HTML-Feature-2.0.3.tar.gz
tar zfp HTML-Feature-2.0.3.tar.gz
cd HTML-Feature-2.0.3
perl Makefile.PL
make

サンプルプログラム

#!/usr/local/bin/perl
use strict;
use warnings;

use HTML::Feature;
my $f = HTML::Feature->new(enc_type=>'euc-jp');
my $result = $f->parse ('http://dailynews.yahoo.co.jp/fc/computer/portal_sites/');

print "Title: ",	$result->title (), "\n";
print "Description: ",	$result->desc (), "\n";
print "Featured Text: ",	$result->text (), "\n";
print "HTML Element: ",	$result->element->as_HTML (), "\n";

Title: Yahoo!ニュース - ポータルサイト動向
Description: 
Featured Text: 音楽SNS「Last.fm」日本語版サービス終了 
エキサイトは11月5日、音楽SNS「Last.fm」について同社ドメインで運営する日本語版サイトのサービスを終了した。日本語版サイトはLast.fmドメインに統合。エキサイトIDとLast.fmのID連携も終了したが、パスワードを再登録すれば、プロフィールなどを保存したまま引き続きサービスを利用できる。(ITmedia) 
[記事全文] 



エキサイト、Last.fmのエキサイトID連携など終了。日本語サイトを1本化  - Impress Watch(2日) 


Last.fm 


ソーシャルネットワーキング  - Yahoo!トピックス 

[写真]ITmedia
HTML Element: <td colspan="2" valign="top"><img align="right"
alt="Photo" border="1" hspace="5"
src="http://ca.c.yimg.jp/news/20071105140755/img.news.yahoo.co.jp/images/20071105/zdn_n/20071105-00000029-zdn_n-sci-thum-000.jpg"
vspace="5" /><font size="+1"><b><a
href="http://headlines.yahoo.co.jp/hl?a=20071105-00000029-zdn_n-sci">&#x97F3;&#x697D;SNS&#x300C;Last.fm&#x300D;&#x65E5;&#x672C;&#x8A9E;&#x7248;&#x30B5;&#x30FC;&#x30D3;&#x30B9;&#x7D42;&#x4E86;</a></b></font><br
/>&#x30A8;&#x30AD;&#x30B5;&#x30A4;&#x30C8;&#x306F;11&#x6708;5&#x65E5;&#x3001;&#x97F3;&#x697D;SNS&#x300C;Last.fm&#x300D;&#x306B;&#x3064;&#x3044;&#x3066;&#x540C;&#x793E;&#x30C9;&#x30E1;&#x30A4;&#x30F3;&#x3067;&#x904B;&#x55B6;&#x3059;&#x308B;&#x65E5;&#x672C;&#x8A9E;&#x7248;&#x30B5;&#x30A4;&#x30C8;&#x306E;&#x30B5;&#x30FC;&#x30D3;&#x30B9;&#x3092;&#x7D42;&#x4E86;&#x3057;&#x305F;&#x3002;&#x65E5;&#x672C;&#x8A9E;&#x7248;&#x30B5;&#x30A4;&#x30C8;&#x306F;Last.fm&#x30C9;&#x30E1;&#x30A4;&#x30F3;&#x306B;&#x7D71;&#x5408;&#x3002;&#x30A8;&#x30AD;&#x30B5;&#x30A4;&#x30C8;ID&#x3068;Last.fm&#x306E;ID&#x9023;&#x643A;&#x3082;&#x7D42;&#x4E86;&#x3057;&#x305F;&#x304C;&#x3001;&#x30D1;&#x30B9;&#x30EF;&#x30FC;&#x30C9;&#x3092;&#x518D;&#x767B;&#x9332;&#x3059;&#x308C;&#x3070;&#x3001;&#x30D7;&#x30ED;&#x30D5;&#x30A3;&#x30FC;&#x30EB;&#x306A;&#x3069;&#x3092;&#x4FDD;&#x5B58;&#x3057;&#x305F;&#x307E;&#x307E;&#x5F15;&#x304D;&#x7D9A;&#x304D;&#x30B5;&#x30FC;&#x30D3;&#x30B9;&#x3092;&#x5229;&#x7528;&#x3067;&#x304D;&#x308B;&#x3002;(ITmedia)<br
/><a
href="http://headlines.yahoo.co.jp/hl?a=20071105-00000029-zdn_n-sci">[&#x8A18;&#x4E8B;&#x5168;&#x6587;]</a><br
/><br /><ul><li><a
href="http://headlines.yahoo.co.jp/hl?a=20071102-00000003-imp-sci">&#x30A8;&#x30AD;&#x30B5;&#x30A4;&#x30C8;&#x3001;Last.fm&#x306E;&#x30A8;&#x30AD;&#x30B5;&#x30A4;&#x30C8;ID&#x9023;&#x643A;&#x306A;&#x3069;&#x7D42;&#x4E86;&#x3002;&#x65E5;&#x672C;&#x8A9E;&#x30B5;&#x30A4;&#x30C8;&#x3092;1&#x672C;&#x5316;</a>
- Impress Watch(2&#x65E5;)<br /><br /><li><a
href="http://brd.dailynews.yahoo.co.jp/SIG=118q6dkgl/EXP=1194678164/*http%3A//www.lastfm.jp/">Last.fm</a><br
/><br /><li><a
href="http://dailynews.yahoo.co.jp/fc/computer/social_networking/">&#x30BD;&#x30FC;&#x30B7;&#x30E3;&#x30EB;&#x30CD;&#x30C3;&#x30C8;&#x30EF;&#x30FC;&#x30AD;&#x30F3;&#x30B0;</a>
- Yahoo!&#x30C8;&#x30D4;&#x30C3;&#x30AF;&#x30B9;<br /><br
/>[&#x5199;&#x771F;]ITmedia</ul></td>

• エキサイト、Last.fmのエキサイトID連携など終了。日本語サイトを1本化 - Impress Watch(2日)
  
  
• Last.fm
  
  
• ソーシャルネットワーキング - Yahoo!トピックス
  
  [写真]ITmedia