StackOverflow2013

Note that there are some explanatory texts on larger screens.

plurals

POsimple XML question for perl - how to retrieve specific elements
primarykey
Id
4643776
data
AcceptedAnswerId
4644046
AnswerCount
3
ClosedDate
CommentCount
0
CommunityOwnedDate
CreationDate
2011-01-10T04:51:59.693
FavoriteCount
0
LastActivityDate
2011-02-15T04:04:43.713
LastEditDate
2011-01-10T17:01:37.757
LastEditorUserId
100677
OwnerUserId
100677
ParentId
0
PostTypeId
1
Score
0
ViewCount
466
LastEditorDisplayName
text
Body
I'm trying to figure out how to loop through XML but I've read a lot and I'm still getting stuck. Here's the info: I'm using the wordnik api to retrieve XML with XML::Simple: <pre><code> $content = get($url); $r = $xml->XMLin("$content"); </code></pre> The actual XML looks like this: <pre><code><definitions> − <definition sequence="0" id="0"> − <text> To withdraw one's support or help from, especially in spite of duty, allegiance, or responsibility; desert: abandon a friend in trouble. </text> <headword>abandon</headword> <partOfSpeech>verb-transitive</partOfSpeech> </definition> − <definition sequence="1" id="0"> − <text> To give up by leaving or ceasing to operate or inhabit, especially as a result of danger or other impending threat: abandoned the ship. </text> <headword>abandon</headword> <partOfSpeech>verb-transitive</partOfSpeech> </definition> − <definition sequence="2" id="0"> − <text> To surrender one's claim to, right to, or interest in; give up entirely. See Synonyms at relinquish. </text> <headword>abandon</headword> <partOfSpeech>verb-transitive</partOfSpeech> </definition> − <definition sequence="3" id="0"> </code></pre> ... What I want is simply the FIRST definition's part of speech. I'm using this code but it's getting the LAST definition's POS: <pre><code> if($r->{definition}->{0}->{partOfSpeech}) { $pos = $r->{definition}->{0}->{partOfSpeech}; } else { $pos = $r->{definition}->{partOfSpeech}; } </code></pre> I am pretty embarrassed by this since I know there's an obviously better way to do it. I would love to get something as simple as this working so I could more generally loop through the elements. BUt it just isn't working for me (no idea what to reference). I've tried many variations of the following - this is just my last attempt: <pre><code> while (my ($k, $v) = each %{$r->{definitions}->{definition}[0]->{sequence}->{partOfSpeech}}) { $v =~ s/'/'"'"'/g; $v = "'$v'"; print "export $k=$v\n"; } </code></pre> Lastly, when I do "print Dumper($r)" it gives me this: <pre><code>$VAR1 = { 'definition' => { '0' => { 'partOfSpeech' => 'noun', 'sequence' => '6', 'text' => 'A complete surrender of inhibitions.', 'headword' => 'abandon' } } }; </code></pre> (And that "noun" you see is the last (6th) definition/partofspeech element). <hr> Based on RC's answer below, my new code looks like this: <pre><code>$content = get($url); $r = $xml->XMLin("$content", KeyAttr => { definition => 'sequence'}); while (my ($k, $v) = each %{$r->{definition}}) { $v=$r->{definition}->{$k}->{partOfSpeech}; print "export $k=$v\n"; } </code></pre> This prints out the following: <pre><code>export 6='noun' export 4='verb-transitive' export 1='verb-transitive' export 3='verb-transitive' export 0='verb-transitive' export 2='verb-transitive' export 5='noun' </code></pre> So this is good and it is exporting the correct pairs. But now the issue is that the order is off (which seems very likely to be Wordnik's problem and not a programming issue). How do I sort this by a key? Something like this? <pre><code>sort($r->{definition}); </code></pre>
Tags
<xml><perl>
Title
simple XML question for perl - how to retrieve specific elements
singulars
PostAcceptedAnswerId
1. PO
 singulars
 PostTypePostTypeId
 PTAnswer
PostParentId
1. This table or related slice is empty.
PostTypePostTypeId
1. PTQuestion
UserLastEditorUserId
1. USJeff
UserOwnerUserId
1. USJeff
plurals
PostLinksPostIdRelatedPostId
1. This table or related slice is empty.
PostLinksRelatedPostIdPostId
1. This table or related slice is empty.
PostsAcceptedAnswerId
1. This table or related slice is empty.
PostsParentIdCreationDate
1. PO
 singulars
 PostTypePostTypeId
 PTAnswer
2. PO
 singulars
 PostTypePostTypeId
 PTAnswer
3. PO
 singulars
 PostTypePostTypeId
 PTAnswer
VotesPostIdCreationDate
1. This table or related slice is empty.
CommentsPostId
1. This table or related slice is empty.

Querying!

Guidance

A row detail

Detail views are divided into sections. All the information in the data section comes from columns in the selected row. The other sections display data from other, related rows.

Related data can be related in a to-one or a to-many fashion. Captions of data related in a to-many fashion link to a list view showing a filtered view of the table.

Try moving around until you find a non-empty to-many entry and click on the label to get to one. You can move back to the root by clicking on the database name in the header.