(DTPtechNote:387) 日付文字列の取得

[市川せうぞー <anonymous at unknown-host>]

AppleScriptUser MLの引き写しなんですけど、
本日の日付文字列を得るのに

do shell script "perl -e '@t = localtime();
printf qq~%s/%02d/%02d~, 1900+$t[5], 1+$t[4], $t[3]'"

っていう方法が紹介されてました。
この方法がすばらしいのは、
・環境に依存しない。
・月名が自然にゼロパディングされる
・フォーマットの変更が容易
・短い
まさに、エレガント！