Здравсвуйте. Очень хочу получить вашу помощь, так как с perl сталкиваюсь впервые.

Имеется файл bugzilla\template\en\default\global\footer.html.tmpl
В нем имеется строка © 2003-2009
Хочется заменить ее так, что бы текущий год выводился програмно:
© 2003-[% TУT текущий ГОД %]

Но поскольку не знаю perl и методом тыка внутри [% ... %] что только не вставлял, или проигнорировано или выдает ошибку парсинга.
К примеру  [% localtime(5) %] не работает.

Может кто нибудь мне помочь?

13-08-2010 16:30:53

#!/usr/local/perl

($sec, $min, $hour, $mday, $mon, $year, $wday, $yday, $isdst) = localtime(time);
$current_year = $year + 1900;
print $current_year;

Вот что я набросал для теста. Оно корректно работает.
А вот запихнуть все это в шаблон между [% ... %]  не умею((

Посмотрите из какого скрипта вызывается данный template. В том скрипте создайте , например,my $year_current; В нем же выполните Ваш код c localtime(time) и передавайте эту переменную в шаблон ( скорей всего через хеш).
А в шаблоне сделайте как обычно [%+ year_current %] .
Что то у себя этих шаблонов найти не смогла.Еще поищу. Если что пишите имя скрипта и место где вызывается footer.html.tmpl

Спасибо. В принцыпе я именно так и сделал, как временное решение. Ну что ж, оно будет постоянным решением))