[Perl] I18N Date Representations with DateTime module

DateTime module makes easy to get an I18N date representaion.
The code below displays date strings in some languages.
use Encode;
use DateTime;
foreach my $lang (qw( de el en es fr ja nl no pl pt sv tr vi )) {
my $fmt = DateTime::Locale->load($lang)->full_date_format();
my $date = DateTime->now(locale => $lang)->strftime($fmt);
my $line = "$lang : $date\n";
print encode_utf8($line);
The result of today is following:
de : Sonntag, 27. August 2006
el : Κυριακή, 27 Αυγούστου 2006
en : Sunday, August 27, 2006
es : domingo 27 de agosto de 2006
fr : dimanche 27 août 2006
ja : 2006年8月27日日曜日
nl : zondag 27 augustus 2006
no : sundag 27. august 2006
pl : niedziela, 27 sierpnia 2006
pt : domingo, 27 de agosto de 2006
sv : den 27 augusti 2006
tr : 27 Ağustos 2006 Pazar
vi : Chủ nhật, ngày 27 tháng tám năm 2006

I remember that NTT DoCoMo's P503i mobile phone have used "Apl" instead of "Apr".

Kurukuru Blog Started!

Kurukuru BlogKurukuru Blog is out now!

This slot machine is a kind of fortune-teller who suggests a blog you would read today. The first day of Kurukuru Blog is featured on "Gold".

Technorati API and Snapshot Service are used to create this page.

Website Thumbnail Image Generating Services

SimpleAPI is a free service to generate a screenshot image captured from any website you want. This service is started in this March.
<img src="http://img.simpleapi.net/small/http://www.kawa.net/">

Two months later, Hatena also released Hatena::Screenshot service for thier blog service's users. Registered users can post a blog which includes screenshots by writing the special wiki markup following:
[http://www.kawa.net:image] ( size: midium )
[http://www.kawa.net:image:large] ( size: large )
[http://www.kawa.net:image:small] ( size: small )

Snapshot service is an yet another service which has no Japanese manuals ;)
You can specify height and width of the thumbnail image generated by this service.
<img src="http://webdesignbook.net/snapper.php?w=160&h=120&url=kawa.net/">

Mailing lists opened on Yahoo! Groups

I've opened three mailing lists today.
We're waiting for you to join us!

XML::TreePP Group (Perl module)

XML::FeedPP Group (Perl module)

XML.ObjTree Group (JavaScript library)

Thank you.