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

[Денис]

привет, ребяты!

показываю простейший скрипт (чтоб быстрее и понятнее). с августа прошлого года похожий работает на одном и том же сервере. все нормально. НО с неделю назад сервкр выдает 505-ю ошибку "Premature end of script headers". что делать? print header; не желательно, потому что тогда print redirect не работает... и вообще, почему такая ошибка стала появляться?

вот скрипт:

#!/usr/bin/perl

use strict;
use CGI qw(:all);

my $valsfile="values"; # counter file

open (INFO,">$valsfile") || die "Cannot create $valsfile: $!\n";
print INFO "0\n"; # counter value
close (INFO);

print redirect (-uri => "blablabla.pl");

exit;