CPAN に XML::RSS::JavaScript というモジュールが追加されてました。
"serialize your RSS as JavaScript" ということで RSS を JavaScript にシリアライズ(変換)してくれるモジュールです。
use XML::RSS::JavaScript;
my $rss = XML::RSS::JavaScript->new;
$rss->channel {
title => 'NDO::Weblog',
link => 'http://naoya.dyndns.org/~naoya/mt/',
description => 'MovableType指向な気まぐれ更新ウェブログ'
};
$rss->add_item {
title => 'エントリのタイトル',
link => 'http://エントリのURL',
description => 'エントリの要約',
};
$rss->save_javascript( '/path/to/myfeed.js' );
とかしてやると RSS を JavaScript にして保存してくれます。保存した JavaScript は HTML から、
<script language="JavaScript" src="/myfeed.js"></script>
とかしてやると読み込めて、フィードの内容がそこに表示されます。
XML::RSS::JavaScript は XML::RSS を継承しているので、
use XML::RSS::JavaScript;
use LWP::Simple;
my $rss = XML::RSS::JavaScript->new;
$rss->parse( LWP::Simple::get('http://some/where/rss.xml') );
$rss->save_javascript( '/path/to/myfeed.js' );
とかしてやって、既存の RSS を JavaScript に変換することも可能です。なんか日本語交じりの RSS に適用したんですが、HTML で読み込んで表示できたもののリロードすると真っ白になっちゃったりしましたけど。
# コードを MT のエントリに素で書いたのでどっか間違ってるかも
