HTML::Elementã‚’è¿”ã™ã‚ˆã†ã«ã—㟠- download_takeshi’s diaryå‰ã€…回ã®ã‚¨ãƒ³ãƒˆãƒªã§ç´¹ä»‹ã—ãŸé‡è¦éƒ¨åˆ†ã‚’抽出ã™ã‚‹perlモジュール「HTML::Featureã€ã§ã™ãŒã€ãã®å¾Œã‚¸ãƒ¯ã‚¸ãƒ¯ã¨å響ãŒã‚ã£ã¦ã€æ„外ãªã“ã¨ã«id:fubaã•ã‚“ã‹ã‚‰ã€ŒHTML::Elementã§ãƒ‡ãƒ¼ã‚¿ã‚’è¿”ã—ã¦ãれるã¨ã„ã„ãªãã€ã¨ã„ã†ãƒªã‚¯ã‚¨ã‚¹ãƒˆã¾ã§ã„ãŸã ãã»ã©ã«ã€‚ ã§ã‚ˆã†ã‚„ã今週末ã«æ™‚é–“ãŒã¨ã‚ŒãŸã®ã§ã€é…ã‚Œã°ã›ãªãŒã‚‰å¯¾å¿œã—ã¦ã¿ã¾ã—ãŸã€‚ http://search.cpan.org/~miki/HTML-Feature-2.0.3/ 精度é¢ã§ã‚‚ã‚ãšã‹ãªãŒã‚‰ãƒãƒ¥ãƒ¼ãƒ³ã‚¢ãƒƒãƒ—ã‚’æ–½ã—ã¦ã„ã¾ã™ã€‚多分少ã—ã ã‘精度ãŒé«˜ããªã£ã¦ã„ã‚‹ã¯ãšã€‚ é‡è¦éƒ¨åˆ†ã®HTML::Elementã‚’å–å¾—ã™ã‚‹æ–¹æ³•ã§ã™ãŒã€ã“ã‚“ãªæ„Ÿã˜ã§OKã§ã™ã€‚ use HTML::Feature; my $feature = HTML::Feature->new; my $result = $feature->parse("http://hogehog
{{#tags}}- {{label}}
{{/tags}}