Select Code to Download

for my $attr_node (
    reverse
...
    my $attr_val = $attr_node->getValue();
    ...
}

for my $entry_node ( reverse $xc->findnodes('//post:entry') ) {
    for my $attr_node ( $xc->findnodes('post:category/@term', $entry_n
+ode) ) {
...
    }
    ...
}