Hallo!
Kann mir jmd sagen wie ich nur den Inhalt ausserhalb der Tags bekomme als output?
#!/usr/bin/perl -wuse strict;
use XML::Simple;
use Data::Dumper;
my $ref = XMLin('montag.xml');
# now you've got the whole XML file in $ref:
print Dumper($ref);
print "\n";
print $ref->{'ResultItem'}->[0]{'MenuName'};
print "\t";
print $ref->{'ResultItem'}->[0]{'Count'} . "\n";
<Result>
<Term>ras</Term>
<egQuery>
<ResultItem>
<DbName>pubmed</DbName>
<MenuName>PubMed</MenuName>
<Count>27832</Count>
<Status>Ok</Status>
</ResultItem>
</egQuery>
$VAR1 = {
'egQuery' => {
'ResultItem' => [
{
'Count' => '27832',
'MenuName' => 'PubMed',
'DbName' => 'pubmed',
'Status' => 'Ok'
} {
}
]
},
'Term' => 'ras'
};
Datum: 02.11.2004-10:46
XML Inhalte
