У меня не работает Perl скрипт и выводит ошибку 500
Я не знаю что у меня не правильно, с chmod-ами всё нормально, а вот это, я не понимаю
:
2.Выводите ли вы строку "Content-Type:"?
Правильно ли вы ее выводите?
(Content-type, Content_Type -- неправильно)
Заканчиваете ли вы хедеры пустой строкой? Нельзя написать print "Content-Type: text/html\n";
Надо писать: print "Content-Type: text/html\n\n";
3.Также, эта ошибка возникает, если CGI-программа завершилась с ненулевым кодом возврата, что часто встречается в случае некомпилируемости вашего скрипта perl'ом.
Объясните пожалуйста что надо вставить в этот скрипт:
#!/usr/bin/perl
require 'cgi-lib.pl';
&ReadParse(*field);
$textfield = $field{'textarea'} ;
$submit = $field{'submit'} ;
open (WRITE, "<../User/user.txt"
or die ("Ошибка!"
;
flock WRITE, LOCK_EX;
print "Content-Type: text/html\n\n";
print WRITE "$textfield\n";
print WRITE, "$submit\n";
flock WRITE, LOCK_UN;
close WRITE;
Заранее большое спасибо!!!