Give a look to this : http://www.xml.com/pub/a/2001/02/14/perlsax.html
José. > -----Original Message----- > From: Nils-Anders Persson [mailto:[EMAIL PROTECTED]] > Sent: Wednesday, January 29, 2003 10:09 AM > To: [EMAIL PROTECTED] > Subject: XML -> Perl-variables using XML::Parser > > > Hello good people! > > I have a bit of a problem with turning this piece of XML into > a Perl-variable using the XML::Parser. Earlier i have used > the XML::Dt parser to do this and it works, but the amount of > data is to big for the later (takes to much time to parse > through the file). I wonder if there is anyone out there with > experience of this that could help me out here. > > The result of the XML-code that follows would look something > like this: > > %Kontoutdraguttag = { Filinfo => { > > SkapadDatum => 2002-05-17 10:13, > > Filnamn=>skkb0061x1, > > Blankettid=>4812.... > } > Kontoutdrag =>{ > > Startid=>162999000041, > > Kontohuvud=> { > > UtskriftsDatum=> 2002-10-07, > > AdressatInfo=> { > > ..... > > > } > > MyndighetsInfo=>{ > > .... > > > } > > ... > > > } > > PeriodSKM=> { > > IngaendeSaldo=> { ...} > > TransRadsArr[0] =>{ > > Spec=>... > > Rantedag=>... > > BeloppSKM=>... > > > } > > TransRadsArr[1]=>{...} > > ... > > > } > .... > } > } > > All help appreciated! > > <?xml version="1.0" encoding="ISO-8859-1" ?> > <!DOCTYPE Kontoutdraguttag SYSTEM "kontoutdrag.dtd"> > <Kontoutdraguttag Version="1.0"> > <Filinfo> > <SkapadDatum>2002-05-17 10:13</SkapadDatum> > <Test/> > <Filnamn>skkb006x1</Filnamn> > <Blankettid>4812</Blankettid> > <AntalKontoutdrag>12</AntalKontoutdrag> > </Filinfo> > <Kontoutdrag> > <Startid>162999000041</Startid> > <KontoHuvud> > <UtskriftsDatum>2002-10-07</UtskriftsDatum> > <AdressatInfo> > <SkattekontoNr>299900-0041</SkattekontoNr> > <Namnrad1>Aktiebolaget Kamelen</Namnrad1> > <Namnrad2>exportvaror</Namnrad2> > <Adressrad1>Box 1111</Adressrad1> > <Adressrad2>615 78 STORKÖPING</Adressrad2> > <RefnrPostgiro>16299900004144</RefnrPostgiro> > <RefnrBankgiro>1629990000411</RefnrBankgiro> > <MottagarKontoNr>8032-125 714 003 > 6</MottagarKontoNr> > </AdressatInfo> > <MyndighetsInfo> > <MyndighetsText>MYNDIGHETEN I > STOCKHOLM</MyndighetsText> > <SkrNamn>Kontoret i Norrtälje</SkrNamn> > <SkrBesoksAdress>Kungsgatan 2</SkrBesoksAdress> > <SkrAdress>Box 215</SkrAdress> > <SkrPostadress>761 23 NORRTÄLJE</SkrPostadress> > <TelefonNr>0176-19650</TelefonNr> > <TelefaxNr>0176-19650</TelefaxNr> > <TelUpplysning>0771-567 567</TelUpplysning> > <PostgiroNr>489 01 03-7</PostgiroNr> > <BankgiroNr>5050-1055</BankgiroNr> > <Epost>[EMAIL PROTECTED]</Epost> > <Webbplats>www.test.se</Webbplats> > </MyndighetsInfo> > <PeriodRubrik>Utdrag t.o.m 2002</PeriodRubrik> > </KontoHuvud> > <PeriodSKM> > <IngaendeSaldo> > <Spec>Ingående saldo</Spec> > <BeloppSKM>-510</BeloppSKM> > </IngaendeSaldo> > <TransRad> > <Spec>Debiterad prel. skatt för 2002</Spec> > <Rantedag>020213</Rantedag> > <BeloppSKM>-10000</BeloppSKM> > </TransRad> > <TransRad> > <Spec>Inbetalning bokförd 020211</Spec> > <Rantedag>020213</Rantedag> > <BeloppSKM>45000</BeloppSKM> > </TransRad> > <OverskottRad> > <Spec>Överskott före ev.utbetalning</Spec> > <BeloppSKM>19490</BeloppSKM> > </OverskottRad> > <UtbetalRad> > <Spec>Utbetalning</Spec> > <BeloppSKM>-18585</BeloppSKM> > </UtbetalRad> > <UtgaendeSaldo> > <Spec>Utgående saldo 2002-03-27</Spec> > <BeloppSKM>+905</BeloppSKM> > </UtgaendeSaldo> > </PeriodSKM> > <SlutskatteText/> > <Utbetalning> > <UtbetGrupp> > <UtbetRubrik>Utbetalningsorsak:</UtbetRubrik> > <UtbetRad> > <UtBetalSpec>Moms för januari 2002</UtBetalSpec> > <UtBetalBelopp>20000</UtBetalBelopp> > </UtbetRad> > </UtbetGrupp> > <UtbetGrupp> > <UtbetRubrik>Uppgifter om utbetalning från > skattekontot:</UtbetRubrik> > <UtbetRad> > <UtBetalSpec>Utbetaltbelopp (högst > belopp enl utbetalningsorsak ovan)*</UtBetalSpec> > <UtBetalBelopp>18585</UtBetalBelopp> > </UtbetRad> > </UtbetGrupp> > <UtbetAvslut>Beloppet sätts in på ditt konto inom en > vecka.</UtbetAvslut> > </Utbetalning> > <Slutid>162999000041</Slutid> > <AntalElement>XX</AntalElement> > </Kontoutdrag> > </Kontoutdraguttag> > > > > Regards, > Nils-Anders > > > > -- > To unsubscribe, e-mail: [EMAIL PROTECTED] > For additional commands, e-mail: [EMAIL PROTECTED] > > **** DISCLAIMER **** "This e-mail and any attachment thereto may contain information which is confidential and/or protected by intellectual property rights and are intended for the sole use of the recipient(s) named above. Any use of the information contained herein (including, but not limited to, total or partial reproduction, communication or distribution in any form) by other persons than the designated recipient(s) is prohibited. If you have received this e-mail in error, please notify the sender either by telephone or by e-mail and delete the material from any computer". Thank you for your cooperation. For further information about Proximus mobile phone services please see our website at http://www.proximus.be or refer to any Proximus agent. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
