Hallo,

ich kenne die Möglichkeit den Bereich in einem Perl-Script nach __END__ bzw. __DATA__ auszulesen:



Wie kann ich jetzt aber z.B. "Zeile 3" vom Code aus ändern oder eine "Zeile 4" hinzufügen?

mike42

Gar nicht. Du kannst ein laufendes Skript nicht im Quelltext modifizieren.

Hallo GwenDragon,

klar kann sich ein Script selbst erweitern. :-)

Das Script z.B. fügt bei jedem Aufruf eine Zeile mit dem Text "test" an sich selbst an:



mike42

PS: Du willst doch nicht sagen Perl könne etwas nicht ;-)
PPS: Ich würde das nur gern über den offiziellen Weg - also über <main::DATA> oder etwas ähnliches machen.\n\n

<!--EDIT|mike42|1172089189-->

Hmm, kannst Dir mal Inline::File anschaun.

Prinzipiell hat Gwendragon schon recht, denn das ausgeführte - das laufende Skript, und die Datei, in der ihr Quellcode drin steht, sind unterschiedliche Dinge.
Aber für's nächste Ausführen kann man natürlich die Datei ändern.

Um dabei den Quellcode während der Laufzeit noch zu ändern, braucht es andere Bandagen (frag mich nicht, ich weiß es gerade nicht).

Du kannst DATA mit Seek auf den Anfang des Skripts oder wo auch immer hin zurücksetzen, ob du dann Zeilen einfügen kannst bzw. in wieweit sich die dann abarbeiten lassen... hmmm kannst du nicht ein zweites Skript erzeugen das du dann aufrufst?

@mike42

Einer der bedeutensten Aspekte der Erfindung der "von Neumann"-Architektur ist die Trennung von Daten und Code. Bis auf einige Sonderfälle, die es geben mag, machst das ha auch Sinn und ist bis heute das bevorzugte Paradigma.

Insbesondere, wenn es um dynamische Daten geht, würde ich die Daten nicht im Code integriert haben wollen.

Ich kenne die Problemstellung Deines Scriptes nicht, daher meine Frage: wo siehst Du (in Deinem Fall) die Vorteile, Daten in den Code zu integrieren? (man will ja dazulernen)

Gruß, Doc\n\n

<!--EDIT|docsnyder|1172135210-->

ich find das übrigens doof, dass das ENDE immer am Zeilenanfang stehen muss. Das sieht unstylist aus in meinem quelltext

[quote=Crian,22.02.2007, 09:22]Du kannst DATA mit Seek auf den Anfang des Skripts oder wo auch immer hin zurücksetzen, ob du dann Zeilen einfügen kannst bzw. in wieweit sich die dann abarbeiten lassen... hmmm kannst du nicht ein zweites Skript erzeugen das du dann aufrufst?[/quote]
och, exec $0 sollte schon gehen. Wenn man nicht so ein komisches BetrübssysteM$ hat, das einem das Datei besdchreiben während des Ausführens verbietet.

@Relais: Danke für die Info mit Inline::File. Die Beschreibung passt schon sehr gut. Ich werde mir das mal genauer ansehen.

@Crian: Das werde ich auch mal ausprobieren. Im Prinzip könnte ich es ja auch mit meinem geposteten Beispiel machen. Den Quelltext über Regex prüfen und nach der Zeile mit __END__ anfangen zu schreiben. Allerdings dachte ich, ich hätte mal irgenwo gelesen, dass es dafür einen Standardweg gibt. Eventuell war es ja das Inline::File Modul.

@docsnyder: Ich trenne normalerweise auch Daten und Code. Beim Inline::File Modul wird quasi auch davor gewarnt es zu verwenden :-)

Ich habe eine Script das Daten aus einer XML-Datei ausliest und als CSV Datei schreibt. Die Titelzeile der CSV Datei in der die Spaltentitel stehen wollte ich kommasepariert in den Datenblock nach __END__ legen und dort - wenn notwendig - dynamisch vom Script erweitern lassen. Das soll dann geschehen wenn es neue Properties in der XML Datei gibt. Die kommaseparierten Spaltentitelzeile sollten dann dynamisch um diese erweitert werden.

mike42

@mike42

O.K., ich habe soweit verstanden, was Du tun willst. Mir ist aber noch nicht klar, wo der Vorteil liegt, die Titelzeile an das Script anzuhängen anstatt sie in eine eigene Datei zu schreiben.

Gruss, Doc