У меня не работает Perl скрипт и выводит ошибку 500
![](http://www.webhostingtalk.ru/iB_html/non-cgi/emoticons/confused.gif)
Я не знаю что у меня не правильно, с chmod-ами всё нормально, а вот это, я не понимаю
![](http://www.webhostingtalk.ru/iB_html/non-cgi/emoticons/confused.gif)
:
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"
![Wink](images/smilies/wink.gif)
or die ("Ошибка!"
![Wink](images/smilies/wink.gif)
;
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;
Заранее большое спасибо!!!