PDA

Archiv verlassen und diese Seite im Standarddesign anzeigen : [PERL] Arrays, Hashes und XML


Gast
2006-03-14, 16:07:12
Ich hab folgendes Problem:
Ich lese XML Dateien mit XML::Simple ein und will auf diese zugreifen..

kein Problem, Datei schaut z.B. so aus:
<cfg>
<switch bezeichner="switch1" ip="192.168.2.1" pass="Password" en="enable">
<port number="1" mac="00:01:75:9d:8d:ab" />
<port number="2" mac="00:01:22:e2:32:4d" />
</switch>
<switch bezeichner="switch2" ip="192.168.1.2" pass="Password" en="enable">
<port number="1" mac="00:01:75:9d:8d:ab" />
<port number="2" mac="00:01:22:e2:32:4d" />
</switch>
</cfg>

Funktioniert soweit ich bekomme dann einen Hash welchern ein Array enthält, welches ein Hash enthält welches.. dreckig aber geht.. mit ein paar foreach und ein bischen if geht das..

jetzt ist aber die Sache diese: hab ich nur einen Switch erzeugt mir das XML:Simple keine Hash und meine Foreach beschwert sich.. kann ich also irgendwie Prüfen ob das Ding eine Array Reference ist, wenn ja wie, wenn jemand nen besseren Vorschlag hat: gern her damit.

Gast
2006-03-14, 16:37:35
Args.. selber gefunden.

XMLIn("filename", ForceArray => qr/[switch]$/);