サンプルプログラム ここまでのことを踏まえて、RSSをHTMLとして出力するCGIプログラムのサンプルをご紹介します。 #!/usr/bin/perl use strict; use lib qw(./mylib); use XML::RSS; use LWP::Simple; # RSSデータのURL my $url = 'http://allabout.co.jp/rss/all/index.rdf'; # RSSデータの保存用ファイル my $file = './data/allabout.rss'; # RSSデータのチェック(更新されていれば取得) mirror($url, $file); # 保存されているRSSデータを解析 my $rss = new XML::RSS; $rss->parsefile($file); # HTMLの出力開始