Perl как запустить скрипт?

[zoomersd]

Подскажите пожалуйста, есть файл 1.html с кодом:

#!/usr/local/bin/perluse lib '.'; use CGI qw/:standard/;$q = new CGI;print $q->header(-type=>'text/html',-expires=>'+10s');print $q->start_html(-title=>'Esimene CGI',-BGCOLOR=>'white');if (param){$nimi=$q->param('nimi');print "<h1>Esimene proov</h1>\n";print "Sa sisestasid: <b>$nimi</b> \n";} else {($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time);$mon++;$year+=1900;$kuup="$mday.$mon.$year a.";print <<HERE;<h1>Esimene proov</h1><form name="esimene" method="post" action=lihtnecgi.cgi>HEREprint "Täna on $kuup<p>\n";print <<HERE;Palun sisesta oma nimi: <input name=nimi size=25><p><table width=50%><tr><td><input type=submit value="VAATAN TULEMUST"></td> <td align=right><input type=reset value="TÜHJENDAN VÄLJAD"></td></tr></table>HERE} print end_html;exit;

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

[Kobi]

zoomersd

Ты уверен, что путь /usr/local/bin/perl, указывающий на местонахождение интерпритатора Perl, верно указан?

Есть ли у тебя доступ к конфигурационному файлу HTTP-сервера?

Попробуй этому скрипту дать расширение не *.pl, а *.cgi

Изменено 6 апреля, 2006 пользователем Kobi

[zoomersd]

да. путь указан верно.

а вот ко конфигурации у меня доступа нет. переименовывать в 1.cgi тоже не помогает