Thread Einfügen eines Wertes in Zeile 3 einer Datei: ...bei einem CMS (12 answers)
Opened by cbxk1xg at 2004-07-03 19:28

cbxk1xg
 2004-07-04 00:03
#3025 #3025
User since
2003-10-20
496 Artikel
BenutzerIn
[default_avatar]
Falls es jemanden interessiert... Ich habe eine, wie ich finde, performate und einfache Lösung gefunden.

Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
my $PMheader1 = "\n<;!-- Template: $VAR{'template'} -->;\n<html";
my $PMheader2 = "\n<;!-- Template: $VAR{'template'} -->;\n<HTML";

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

  my (@TEMPLATE) = @_;

  foreach $line (@TEMPLATE)
  {
    $line =~ s/\<html/$PMheader1/;
    $line =~ s/\<html/$PMheader2/;
    print "$line\n";
  }


Es wird einfach das Array nach <html und <HTML durchsucht und entsprechend ersetzt. Damit habe ich meine TAGS an einer unkritischen Stelle plaziert und falls jemand z.B. so etwas hier schreibt:
Code: (dl )
<html lang="en">


oder so was
Code: (dl )
<html xmlns="http://www.w3.org/1999/xhtml" lang="en" xml:lang="en">


Wird der Code nicht verschlimmbessert. Für den User sieht es dann so aus, als hätte ich sein Template nie "angefasst".

View full thread Einfügen eines Wertes in Zeile 3 einer Datei: ...bei einem CMS