Opened by cohama at 2013-03-28 13:16
User since
2003-08-04
12208 Artikel
Admin1
![[Homepage]](/battie/theme/default/homepage.gif)
2003-08-04
12208 Artikel
Admin1
okay, dann nochmal andersherum.
im folgenden zeige ich dir kompletten code inklusive ausgabe.
wie du siehst, funktioniert das hervorragend, und das sogar ohne xml-deklaration.
bei den informationen, die du postest, hilft leider nur eine glaskugel.
bitte probier mein code-beispiel aus. funktioniert es?
wenn nein, gibts irgendwo einen bug.
wenn ja, was machst du in deinem skript anders? wenn du es nicht rausfindest, poste den kompletten relevanten code.
im folgenden zeige ich dir kompletten code inklusive ausgabe.
Code (perl): (dl
)
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
my $xml = q{<ServerResp><pp ppn="1" relType="Dynamic" uid="3" ipei="00435709475" ac="10551" s="Yes" uak="328497hfdfh8" encrypt="1" } . q{capMessaging="1" capMessagingForInternalUse="0" capEnhLocating="1" capBluetooth="1" ethAddr="00:30:42:0F:F2:7D" hwType="630d" /></ServerResp>}; use XML::LibXML; my $p = XML::LibXML->new; my $doc = $p->parse_string($xml); my $root = $doc->documentElement; my ($pp) = $root->findnodes("pp"); for my $field ( qw/ uid ppn ethAddr hwType /) { say $pp->getAttribute($field) } __END__ 3 1 00:30:42:0F:F2:7D 630d
wie du siehst, funktioniert das hervorragend, und das sogar ohne xml-deklaration.
bei den informationen, die du postest, hilft leider nur eine glaskugel.
bitte probier mein code-beispiel aus. funktioniert es?
wenn nein, gibts irgendwo einen bug.
wenn ja, was machst du in deinem skript anders? wenn du es nicht rausfindest, poste den kompletten relevanten code.
Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
lesen:
Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
lesen:
Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem