xNeTworKx: Header definieren

Beitrag lesen

Hi,

Wie kann ich einen Header (HTML Zeilen, die ich überall wieder einfügen kann) in Perl definieren ?

Was jetzt ? eine Header oder HTML Zeilen überall einfügen ?

header : print "Content-type:text/html\n\n";
html Zeilen, dieman überall einfügen kann:

die html zeilen werden hier eingefügt:

&htmlzeilen;

und hier

&htmlzeilen;

und hier auch

&htmzeilen;

sub htmlzeilen   {
print "<html><head><title></title></head><body>\n";
print "Hallo\n";
print "</body>\n";
print "</html>\n";
}