perlで気軽にsitemap.xmlを作る

いきなりですが結論です。
WWW::Google::SIteMapモジュールを使いましょう。

#!/usr/bin/perl

use strict;
use warnings;

use WWW::Google::SiteMap;
use WWW::Google::SiteMap::URL;

my $map = WWW::Google::SiteMap->new();

$map->add(WWW::Google::SiteMap::URL->new(
    loc => 'http://sample.com/',
    priority => 1.0,
	changefreq => 'daily',
));

print $map->xml;

こんな具合で簡単に出来てしまいます。例えばWebアプリケーションの場合だと複雑なクエリパラメータがついていたり、あるいはPATH_INFOをゴリゴリ弄ったりしてURL文字列を生成しているなんてケースもあるかと思いますので、WebアプリケーションでそのようなURL生成ルーチンがある場合は、動的に生成してしまった方が良いシーンもあるかと思います。

WWW::Google::SiteMap::URLモジュールのpodに各url要素に指定出来る値に相当するアクセサがありますので、詳細はそちらの方でご確認下さい。(ちなみに最終更新日にDateTimeモジュールが使えるようになってます。)