Premature end of script headers - Fehler - woher?

[Aqua]

Hallo!

Dieses Script geht in der Shell,
aber nicht im Browser.

Wenn man es im Browser aufruft bekommt man in der error_log
den Fehler "Premature end of script headers"

============================================================

#!/usr/bin/perl

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

sub errormessage
{
print $_[0]."\n";
}

open (DATA, "< readme.txt") || &errormessage($!);

while (<DATA>)
{
print;
}

close(DATA);

============================================================

Nachdem es in der Shell geht könnte es ja nur die Shebang oder
der Content-type sein aber beide sollten richtig sein ...

Danke
Aqua