неправильный заголовок из сценария. Плохой заголовок = <! DOCTYPE HTML>

Я получаю следующее сообщение об ошибке сервера на PERL скрипт:неправильный заголовок из сценария. Плохой заголовок = <! DOCTYPE HTML>

уродливы заголовок из сценария. Bad заголовок =: youtube_perl.pl,

Вот мой исходный код:

#!"C:\XAMPP\perl\bin\perl.exe" -T 

use strict; 
use warnings; 

use CGI; 
use CGI::Carp qw/fatalsToBrowser/; 
use WWW::Mechanize; 

my $q = CGI->new; 

my $url = 'http://www.youtube.com'; 

my $mechanize = WWW::Mechanize->new(autocheck => 1); 

$mechanize->get($url); 

my $page = $mechanize->content(); 

print $page;

Заранее спасибо!

источник

2011-01-25 nicktendo

Выяснил это. Если бы добавить следующее, прежде чем я пытался напечатать страницу:

print "Content-type: text/html\n\n";

Я думаю, Perl не может печатать HTML-страницы без определения заголовка первой.

Malformed заголовок от ошибки сценария

В файле журнала ошибок:

источник

2011-01-25 18:05:59 nicktendo

@ user589294 - № Perl может печатать их. Но они не будут действительными ответами HTTP. Поэтому, если вы хотите, чтобы ваша страница HTML, напечатанная Perl, переносилась по HTTP, вам нужно на самом деле распечатать полный HTTP-ответ - не имеет никакого отношения к Perl – DVK

Конечно, Perl может печатать HTML-страницы без заголовка! Однако вы не можете писать сценарий CGI без печати заголовка. Лучше: 'print $ q-> header();'. См. [Perldoc CGI] (http://perldoc.perl.org/CGI.html). – mscha

Вы должны использовать '\ x0D \ x0A', а не' \ n' как EOL при разговоре по HTTP. HTTP указывает, что строки должны быть завершены с помощью CR-LF, тогда как '\ n' - это маркер конца строки для вашей текущей среды,' \ n' просто является '\ x0D \ x0A' для вас, потому что вы работаете в Windows , –

print "Content-type: text/html\n\n";

Используйте \n\n без этого ничего не будет давать печати.

источник

2017-09-19 09:22:48 sahil

неправильный заголовок из сценария. Плохой заголовок = <! DOCTYPE HTML>

ответ

Смежные вопросы