Thread Hilfe Log datei analysieren in Perl: Hilfe Log datei analysieren in Perl
(7 answers)
Opened by Gast at 2006-08-16 13:02
Diese Lösung ist noch nicht ganz fertig. Das was du noch machen musst ist die ausgelesenen Daten vernünftig in eine Struktur Speichern. Dafür habe ich jetzt keine Zeit gehabt. Das einzige was erforderlich ist, das eine ausgeglichene Anzahl öffnender/schließender Klammern existiert. ich denke aber mal in der Originaldatei wird das vorhanden sein. Ich musste hier noch ein paar schließende Klammern letztendlich hinzufügen.
Code: (dl
)
Vorläufig entfernt: siehe unten. Beim Ausführen kommt dann folgendes heraus: Code: (dl
)
1 HASH: [logical-routers] Es muss also noch gemacht werden das überall wo HASH steht sozusagen die Datendarstellung eine ebene Tiefer geht. Also HASH wäre immer ein Kandidat für einen Key. Und enthält dann als Value wieder ein Hash u.s.w. Bisher weiß ich noch nicht genau wie ich das anstelle, aber das beispiel zeigt schnmal wie man an die Daten kommt, und darauf lässt sich schon aufbauend die Daten in eine Struktur speichern. EDIT: Naja __DATA__ ist hier so gut wie überhaupt nicht richtig Formatiert. Sollte aber eigentlich Formatiert sein. Da in den Regex Newlines benutzt werden muss diese aber stimmen. Habe jetzt keine Lust das neu zu Formatieren. Die Datei kannst du auch hier herunterladen. http://sidburn.de/pub/verschachtelung.plx EDIT2: Hab den Quelltext hier rausgenommen, dass macht kein Sinn. Wenn ich $1 schreibe wird es angezeigt, wenn ich auf Preview drücke auch, sobald ich auf "submit" gehe steht da irgendetwas anderes. Gibt wohl Zeichensatz probleme. Die Datei oben ist übrigens UTF-8 Codiert.\n\n <!--EDIT|sid burn|1155824013--> Nicht mehr aktiv. Bei Kontakt: ICQ: 404181669 E-Mail: perl@david-raab.de
|