frei

旧「anney's room」からブログ「frei」だけ引っ越し＆残しました

日付フォーマットMACRO。

プログラミング

何故だ。

何故に Template::Plugin::Date は

'h:m:s d-m-y' のフォーマットを基準にしたがるんだぁぅぁっ！

って訳で、そんなフォーマットは無視してしまえ、と

MACRO 使いました。

他にもっと賢いやり方が、きっとあるに違いない…と思いながら。



[% MACRO formatDate(date) PERL %]


   my $date = $stash->get('date');


   my ($year, $month, $day, $hour, $minute, $second) = split /[^0-9]/, $date;


   my $formatDate = sprintf "'%02d/%02d/%02d %02d:%02d", $year, $month, $day, $hour, $minute;


   print $formatDate;


[% END %]

で、こいつをテンプレート内で INCLUDE してですな、



[% INCLUDE 'formatDate.tpl' %]


[% formatDate('2006-03-06 12:34:56') %]

なんてやると



'06/03/06 12:34

と表示してくれる次第。

って、正直引数の持たせ方に、疑問を感じてるのだけど。

こんなんであってるのかしら？