Frank Scharffenberg: CGI.pm -» print zum Browser geht nicht - Jetzt doch! - Danke

Beitrag lesen

Hallo, der Header muss vorher zum Browser geschickt werden, d.h., erst der Header,
dann das Dokument.

Hallo Rolf!

ganz zum Anfang hatte ich's so:

use CGI qw(:standard);      
.
.
.

Übergabeparameter lesen und aufbereiten

$tag      = param('tag');
$monat    = param('monat');
$jahr     = param('jahr');
.
.
&msgreg(@html);
.
.
sub msgreg {
#template lesen
open (FILE,"$regresultpath") die "Can't Open $regresultpath!\n";
@lines = <FILE>;
close(FILE);
print "Content-type: text/html\n\n"; #header
#result ausgeben und bei '<!--begin->' @html einfügen
foreach $line (@lines) {
    if ($line =~ /<!--begin-->/) {
       print @_;
    } else {
       print $line;
    }
}
}

ging aber auch nicht...   :-(
jedenfalls "offline" auf meinem PC. Online ist dieses Script nämlich so im Einsatz (UNIX, Apache, Perl5.004).

Gruß Frank