>>Das Zerstückeln des Scriptes macht nur begrenzt Sinn....<<
Das habe ich auch angenommen, nachdem ich mich mit dem UA-Script befasst habe. Ein autonomer Script sogar für das Anfordern eines vergessenen Passworts und dergleichen... UA war übrigens bis v3.6x auch nichts anderes als ein aufgemotztes Everyauction DB GPL Derivat.
Ähnlich wie das gewaltige Template-Management, vor Allem wenn man sieht wieviele "Code-Sachen" im (admin-editierbaren) HTML Text eingebunden sind. Da braucht einer nur etwas daran zu ändern, und dann funzt diese Seite garantiert nicht mehr und ein Anruf bei UA wird fällig....
Es macht doch genau so wenig Sinn, eine externe Template für 8 Zeilen Text aufzurufen, da geht es sicher schneller, die Zeilen unter "qq|" oder ähnlich im Script zu "verpacken", auch wenn solches natürlich bei möglichen nachträglichen Anpassungen etwas intransparenter zu handlen ist als eine Template.
Demo Admin Seite von UA
Aber man kann vielleicht auch zuviel machen wollen. Heutige Dual-Core Dedicated's mit Gigas of RAM verzeihen heute vieles, was vor wenigen Jahren noch zum Server Overload führen konnte...
---
Bezüglich langer Linie:
Die Länge der $variable-Zeilen kann ich schon anpassen. Ich mach das zum Beispiel bei:
my($password,$email,@blah) = read_reg_file($whoever);
Der Artikelstamm wird immer vollständig eingelesen, da möglicherweise der benötigte $Variable-Wert erst in Zeile 49 von 50 eingetragen ist, und daher alle darüberstehenden Zeilen vorgezählt werden müssen, sonst wird die falsche Zeile gelesen und deren Inhalt dargestellt, oder, je nach Content Filterung, eine Fehlerseite produziert.
---
Noch etwas Technik. Ich produziere gelegentlich Reg-Dateien ohne Titel. Das kommt, weil noch nicht alle Dinge "geschaltet" sind. Ich möchte diese Nuller automatisch löschen, denn sie verfälschen u.A. Zähler-Ergebnisse und ich erhalte in der Benutzer-Indexliste einen Eintrag ohne Benutzernamen. Ich möchte aber nicht diesen Eintrag unterdrücken, sondern die Nuller Datei sofort löschen.
Die Datei heisst:
.dat
anstelle von:
Whoever.dat
Zum Lesen der Dateien wird diese Routine gebraucht:
USERIDXFILE: foreach $file (@userfiles){
if ($file =~ /\.dat/) {
...
...
Ich nehme an, dass es irgend etwas derartiges braucht, um den Nuller zu löschen:
if ($file = .dat) {
unlink "$config{'regdir'}/.dat";
}
aber ich hab's bislang noch nicht fertig gebracht, weil vor und nach ".dat" noch was rein muss was ich wieder einmal nicht weiss.
Etwelche Hilfe würde bestens verdankt.
Ein schönes Wochenende
Ernie
Never judge another men before you walk a mile in his shoes