use strict;
use warnings;

use XML::LibXML;
use XML::Atom::Feed;

my $feed = XML::Atom::Feed->new(\*DATA);

foreach my $entry ($feed->entries)
{
	printf(
		"Got: %s (%s)\n",
		$entry->content->elem->findvalue('./m:properties/d:Title'),
		$entry->content->elem->findvalue('./m:properties/d:Url'),
	);
}

__DATA__
<feed
		xmlns:d="http://schemas.microsoft.com/ado/2007/08/dataservices"
		xmlns:m="http://schemas.microsoft.com/ado/2007/08/dataservices/metadata"
		xmlns="http://www.w3.org/2005/Atom"
	>
	<title type="text">xbox</title>
	<subtitle type="text">Bing Web Search</subtitle>
	<id>https://api.datamarket.azure.com/Data.ashx/Bing/SearchWeb/v1/Web?Query='xbox'&amp;Market='en-GB'&amp;$top=3</id>
	<rights type="text"/>
	<updated>2013-03-13T19:01:31Z</updated>
	<link rel="next" href="https://api.datamarket.azure.com/Data.ashx/Bing/SearchWeb/v1/Web?Query='xbox'&amp;Market='en-GB'&amp;$skip=3&amp;$top=3"/>
	<entry>
		<id>https://api.datamarket.azure.com/Data.ashx/Bing/SearchWeb/v1/Web?Query='xbox'&amp;Market='en-GB'&amp;$skip=0&amp;$top=1</id>
		<title type="text">WebResult</title>
		<updated>2013-03-13T19:01:31Z</updated>
		<content type="application/xml">
			<m:properties>
				<d:ID m:type="Edm.Guid">13bfd262-8460-4487-827f-465643cb7</d:ID>
				<d:Title m:type="Edm.String">Xbox 360 - Xbox.com</d:Title>
				<d:Description m:type="Edm.String">Your ultimate Xbox 360 ....</d:Description>
				<d:DisplayUrl m:type="Edm.String">www.xbox.com</d:DisplayUrl>
				<d:Url m:type="Edm.String">http://www.xbox.com/</d:Url>
			</m:properties>
		</content>
	</entry>
	<entry>
		<id>https://api.datamarket.azure.com/Data.ashx/Bing/SearchWeb/v1/Web?Query='xbox'&amp;Market='en-GB'&amp;$skip=1&amp;$top=1</id>
		<title type="text">WebResult</title>
		<updated>2013-03-13T19:01:31Z</updated>
		<content type="application/xml">
			<m:properties>
				<d:ID m:type="Edm.Guid">daf94bdf-e59b-4e17-8c06-62a8b4ff8</d:ID>
				<d:Title m:type="Edm.String">Xbox UK Home</d:Title>
				<d:Description m:type="Edm.String">For UK Xbox gamers ...</d:Description>
				<d:DisplayUrl m:type="Edm.String">www.xbox.com/GB</d:DisplayUrl>
				<d:Url m:type="Edm.String">http://www.xbox.com/GB</d:Url>
			</m:properties>
		</content>
	</entry>
</feed>