malformed header from script. Bad header=<!DOCTYPE html>

perl header perl-module www-mechanize
nicktendo picture nicktendo · Jan 25, 2011 · Viewed 42.9k times · Source

I am receiving the following server error on a perl script:

malformed header from script. Bad header=: youtube_perl.pl,

Here is my source code:

#!"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;

Thanks in advance!

Answer

nicktendo picture nicktendo · Jan 25, 2011

Figured it out. Had to add the following before I attempted to print the page:

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

I guess perl can not print html pages without defining the header first.

Related questions

Find size of an array in Perl

I seem to have come across several different ways to find the size of an array. What is the difference between these three methods? my @arr = (2); print scalar @arr; # First way to print array size print $#arr; # Second way to …

Read More
How do I break out of a loop in Perl?

I'm trying to use a break statement in a for loop, but since I'm also using strict subs in my Perl code, I'm getting an error saying: Bareword "break" not allowed while "strict subs" in use at ./final.pl line 154. …

Read More
How to fix a locale setting warning from Perl?

When I run perl, I get the warning: perl: warning: Setting locale failed. perl: warning: Please check that your locale settings: LANGUAGE = (unset), LC_ALL = (unset), LANG = "en_US.UTF-8" are supported and installed on your system. perl: warning: Falling …

Read More