Kentaro Kuribayashi's blog

Software Engineering, Management, Books, and Daily Journal.

XML::Feed::JavaScript - Serialize XML feeds as JavaScript

だいぶ前に、RSS の各ヴァージョン + ATOM を統一的に扱うことができるモジュール XML::Feed を知ったときに、RSS については XML::RSS::JavaScript が、ATOM については Atom::JavaScript なんてのがあるので、XML::Feed でいっしょくたに JavaScript 生成できるようにしたらいいのではと思ってちょっとやってみたものの、そのときはいま以上に Perl がわからなかったので、作ることができませんでした。今日、なんかちょっと暇だったので思い出してやってみた。つまらないところでハマってしまい、思ったよりも時間がかかり、だんだんムカツイてきた上に、そもそもこんなのいまさら過ぎるとか思って急速にやる気がなくなってきたので、投げました!

いつも自分自身がそれまで使ったことのない機能や手法をあれこれ試してみようと思って、おべんきょのつもりでいろいろやってるのですが、今回のはなんというかキモい…。説明するのも面倒だし、もうなんか投げやりチック。でもまぁ、それなりに動いたり動かなかったりするので、こんなもんでいいや。あと、Perl 5.8.0 以上必須。手抜き。以下、簡単な使い方。

feed2js.pl

#!/usr/bin/env perl

use strict;
use URI;
use XML::Feed::JavaScript;

my $feed = XML::Feedi::JavaScript->parse(URI->new('http://example.com/atom.xml'))
       or die XML::Feed::JavaScript->errstr;
print $feed->as_javascript;

こんな感じで書いておいて、以下のようにして cron で定期実行したりすると、なんかまぁいろいろアレかも、とは思います。

$ perl feed2js.pl > feeds/example.js

しかし、激しくいまさら的なアレなので、アレです。アレ、が多くてすみません……。