##
my $xml = XML::XPath->new (xml => $res->decoded_content);
my $nodeset = $xml->find ("/recordings/recording");
foreach my $recording ($nodeset->get_nodelist)
{
my $id = $recording->find ("id")->string_value ();
my $body = $recording->find ("body")->string_value ();
# Do something with id and body here
}