Ученик (105)

[PERL] HTML::Template выдает ошибку 500, хоть убейся... В логах только Premature end of headers...

Скрипт взят с CPAN!

test.pl

#!/usr/bin/perl -w
use HTML::Template;

# open the html template
my $template = HTML::Template->new(filename => 'form.html');

# fill in some parameters
$template->param(HOME => $ENV{HOME});
$template->param(PATH => $ENV{PATH});

# send the obligatory Content-Type and print the template output
print "Content-Type: text/html\n\n", $template->output;


form.html

<html>
<head><title>Test Template</title></head>
<body>
My Home Directory is <TMPL_VAR NAME=HOME>
<p>
My Path is set to <TMPL_VAR NAME=PATH>
</body>
</html>


Запускаю в консоли - все работает прекрасно. В браузере - пишет код 500. В логах ничего содержательного, кроме описанного выше. В чем проблема???? Спасибо
Регистрируйтесь, делитесь ссылками в соцсетях, получайте на WMR кошелек 20% с каждого денежного зачисления пользователей, пришедших на проект по Вашей ссылке. Подробнее
После регистрации Вы также сможете получать до 75 руб за каждую тысячу уникальных поисковых переходов на Ваш вопрос или ответ Подробнее
ОТВЕТЫ
Знаток (425)
Вероятно, версия 2.10 by Michael Peters баговата. Почему-то с ней ни фига не работает. Поставь через PPM версию 2.9 by Sam Tregar в site area. И укажи в скрипте путь к либе (use lib 'bla/bla') .

Только вот у меня работало с полным путем (т.е. путь к шаблону был полный). У тебя - нет. Не знаю, будет работать или нет. Напиши, как пойдут дела...