久々Plaggerネタ。めんどくさいので説明なしで... スクリプト hatena-news.pl use strict; use warnings; use utf8; use Web::Scraper; use URI; my $uri = URI->new( "http://news.hatelabo.jp/" ); my $entry_scanner = scraper { process 'h1.article', summary => 'TEXT'; process 'div.section', body => 'RAW'; }; my $scanner = scraper { process '//td[.//span[text()="主なニュース"]]//ul/li', 'entries[]' => scraper { process 'a', title => 'TEXT
![Big Sky :: はてなニュースのRSSを出力するCustomFeedScript](https://cdn-ak-scissors.b.st-hatena.com/image/square/ae5f360d3c82cd87e23b34fb6f5013ab7cf0f1a6/height=288;version=1;width=512/https%3A%2F%2Fmattn.kaoriya.net%2Fimages%2Flogo.png)