Архив форумов ЦИТФорума

[smi]

Помогите, пожалуйста, в следующей ситуации: я тестирую скрипт на Перле. При загрузке файла вместо выполнения появляется окно загрузки файла, а затем надпись "Данный узел недоступен. Попробуйте через некоторое время". Странно, ши-бэнг есть, таким образом даже если есть ошибки, он должен уведомлять о них по-другому.

#! C:/Perl/bin/perl -w

$mailprog='C:/sendmail/sendmail.exe';

$to = '"victorina@audioclub.ru" ';
$recip = 'victorina@audioclub.ru';
$from = '"Викторина" ';
$subject = "Викторина";
$mainbody = "This is the main body\n";
#$attachment = "This is an attachment\n";

#$message = MakeMessage($to, $from, $subject, $mainbody, #$attachment);

open (MAIL, "|mailprog -t");
print MAIL "Hello";
print MAIL "To: $to\n";
print MAIL "From: $from\n";
print MAIL "Reply-to: $recip\n";
print MAIL "Content-Language: ru\n";
print MAIL "Content-Type: text/plain; charset=windows-1251\n";
print MAIL "Content-Transfer- Encoding: 8bit\n";
print MAIL "Subject: $subject\n\n";
print MAIL "Ответы на вопросы:\n";
print MAIL "1.$a1\n";
print MAIL "2.$a2\n";
print MAIL "3.$a3\n";
print MAIL "$anketahead";
print MAIL "$anketadata";
print MAIL "\n.\n";

close (MAIL);

[Verner]

Не подключен перловый интерпритатор в веб серверу(не прописан), и веб сервер выдает его как обычный текстовый документ.
Необходимо прописать обработку .pl файлов perl.exe в расширениях веб сервера(как зависит от веб сервера) и поставить права на выполнение на эти скрипты.
Хотя если последняя версия перла, то он должен, помоему сам это делать при установке.