Mit Perl XML parsen

Einklappen
X
 
  • Filter
  • Zeit
  • Anzeigen
Alles löschen
neue Beiträge

  • Mit Perl XML parsen

    Hallo!

    Hab folgendes sehr dringendes Problem.
    Ich benötige einen Parser für Perl der mir folgenden XML-Code verarbeitet.

    <XXXX version="8.0">
    <OPEN_ITEMS DATE="11.04.2001" COST="72.72" TAX="11.41">
    <OPEN_ITEM DESC="XXX" DATE1="11.04.2001" DATE2="22.04.2001" AMOUNT="72.72" TAX_EURO="11.41" />
    <OPEN_ITEM DESC="YYY" DATE1="12.05.2001" DATE2="12.05.2001" AMOUNT="22.71" TAX_EURO="5.21" />
    </OPEN_ITEMS>
    <PAYMENT>YY</PAYMENT>
    <BANK></BANK>
    <SALDO>0</SALDO>
    </XXXX>
    <XXXX version="8.0">
    <OPEN_ITEMS DATE="11.04.2001" COST="72.72" TAX="11.41">
    <OPEN_ITEM DESC="XXX" DATE1="11.04.2001" DATE2="22.04.2001" AMOUNT="72.72" TAX_EURO="11.41" />
    <OPEN_ITEM DESC="YYY" DATE1="12.05.2001" DATE2="12.05.2001" AMOUNT="22.71" TAX_EURO="5.21" />
    </OPEN_ITEMS>
    <PAYMENT>YY</PAYMENT>
    <BANK></BANK>
    <SALDO>0</SALDO>
    </XXXX>



    Das Ergebnis sollte ein TXT-File sein, in dem jedes Feld (Tag) eine eigene Zeile hat.
    z.B.

    <XXXX>
    <version>8.0
    <OPEN_ITEMS>
    <DATE>11.04.2001
    <COST>72.72
    <TAX>11.41
    <OPEN_ITEM>
    <DESC>XXX
    <DATE1>11.04.2001
    <DATE2>22.04.2001
    <AMOUNT>72.72
    <TAX_EURO>11.41
    <OPEN_ITEM>
    <DESC>YYY
    <DATE1>12.05.2001
    <DATE2>12.05.2001
    <AMOUNT>22.71
    <TAX_EURO>5.21
    <PAYMENT>YY
    <BANK>
    <SALDO>0
    <XXXX>
    <version>8.0
    <OPEN_ITEMS>
    <DATE>11.04.2001
    <COST>72.72
    <TAX>11.41
    <OPEN_ITEM>
    <DESC>XXX
    <DATE1>11.04.2001
    <DATE2>22.04.2001
    <AMOUNT>72.72
    <TAX_EURO>11.41
    <OPEN_ITEM>
    <DESC>YYY
    <DATE1>12.05.2001
    <DATE2>12.05.2001
    <AMOUNT>22.71
    <TAX_EURO>5.21
    <PAYMENT>YY
    <BANK>
    <SALDO>0


    Wie löse ich diesen Fall???

    Vielen Dank im Voraus,
    kmi

  • #2
    zum Beispiel mit

    use XML::Simple


    Byteandi
    Sport Dates

    Kommentar

    Lädt...
    X