Achim Zimmer: Wie bekomme ich CSS-Anweisungen korrekt in PERL unter?

Beitrag lesen

Hallo Forum!

Wie kann ich, wenn ich mit Perl mit dem "Print"-Kommando HTML Dateien schreibe, CSS-Anweisungen korrekt in einem Print-Befehl unterbringen -- also in der Art:

print "<style type="text/css">\n" ;
print "body {background-image:url('name.gif');"\n";

Sehr schön wäre doch eine Lösung, mit der Du einmal Dein CSS-Fragment schreibst und in jede Datei wieder einfügst.
Das geht so:

OPEN (INFILE,"cssdatei.txt") die "Kann CSS-Datei nicht oeffnen $!\n";
WHILE (<INFILE>) {print;}
CLOSE (INFILE);

Vielleicht kann mir da jemand helfen (ist wohl 'ne Kleinigkeit)

Ich hoffe das hilft Dir...

Vielen Dank,
Gruß,
Thomas

Beste Grüße

Achim