MrSpoocy: XML::Simple problem mit End-Tag losen Tags ( <irgendwas/> )

Beitrag lesen

Hi,

ich habe XML Dateien welche ich mit einem Perl Script Parse und das sehr simpel aufgebaut ist.

<name>Mein Name</name>  
<irgendwas>anderes</irgendwas>  
<alter/>  
<beruf>Keine Ahnung</beruf>
  
my $xmlObj = XML::Simple->new();  
my $ref = $xmlObj->XMLin($xmlStream);  
  
print "Name: ".$ref->{'name'}."\n";  

so, das geht an sich auch. Problem macht der Tag "<alter/>". Wenn ich mit Dumper mal $ref ausgeben erhalte ich
'alter' => {}
und da liegt das Problem drin. Wie soll ich denn nun prüfen ob alter vielleicht einen wert hat ? Denn es könnte auch sein das in der XML folgendes steht

<name>Mein Name</name>  
<irgendwas>anderes</irgendwas>  
<alter>25</alter>  
<beruf>Keine Ahnung</beruf>

oder der Tag könnte sogar komplett fehlen.
Mir würde es gefallen wenn <alter/> dann als 'alter' => '' erscheint. So kann ich auch gegebenen falls prüfen ob es defined ist.

Einer eine Idee ob es dafür eine Option oder eine Art Filter gibt ?