Problem beim auslesen einer XML-Datei mit XML-Twig - #101263 (Fragen zu Perl-Modulen)

nyjo

2007-10-24 12:37

User since
2005-01-11
17 Artikel
BenutzerIn

Hallo,

ich versuche den Tag geburtsdatum mit XML-Twig auszulesen!

Ausschnitt XML-Datei:

Beispiel 1:

Code: (dl )

<NatuerlichePerson cx:dt="null" cx:ct="struct" _name="NatuerlichePerson">
					<geburtsdatum _name="geburtsdatum">19.05.1949<cx:attrib>
							<_index cx:dt="int">6</_index>
						</cx:attrib>
					</geburtsdatum>

Beispiel 2:

Code: (dl )

1
2

<NatuerlichePerson>
	<geburtsdatum>19.05.1949</geburtsdatum>

Ausschnitt Source:

Code: (dl )

 my $twig = new XML::Twig( twig_handlers => {  $person   => \&getPerson,
                                                $tarif    => \&getTarif,
                                                $adresse  => \&getAdresse } );

  $twig->parsefile( $export{ $docid }->[$FELDER{"XMLPFAD"}] );
.
.
.

sub getPerson{ 
  my( $twig, $pers)= @_;
  my %persTree = &getTreeFieldFromHash( $export{$merkDOCID}->[$FELDER{CATEGORYID}], "PERSON", %docsystree );
    
  foreach my $item ( sort keys %persTree ){
    if( defined($pers->first_child( $persTree{$item} ))){
      $sDummy = encode('iso-8859-1',$pers->first_child( $persTree{$item} )->text);
      print LOGFILE $FELDER{$item}."\n";
      $export{$merkDOCID}->[$FELDER{$item}]   = $sDummy;
    }
  }
}

Im Hash %persTree ist die Struktur gespeichert die ich auslesen möchte!

Beim auslesen des Tags geburtsdatum (Beispiel 1) erhalte ich immer den Wert
19.05.19496! Auslesen der Struktur wie in Beispiel 2 kein Thema.

Hat vielleicht einer eine Idee wie das handeln könnte das ich nur das Datum erhalte? :-/

mfg

Joachim Nyenhuis

alles wird gut

---

mfg

Joachim Nyenhuis