# Needs to be called with <%Plugins::Overture::Show_Overture($ID,5)%>
# herei s where we do the Overture search stuff...
sub Show_Overture {

my $CatID = $_[0];
my $Limit = $_[1];

my $table = $DB->table('Category');
my $sth = $table->select( { ID => $CatID } );
my $Keyword;

while (my $hit = $sth->fetchrow_hashref) {
$Keyword = $hit->{Keyword};
}

my $page = get("http://xml.uk.overture.com/d/search/p/partner/xml/fast/?mkt=uk&maxCount=10&Partner=site_xml_uk_test&Keywords=$Keyword");

my $ref = XMLin($page);

#work out how many listings we have...
my $Count;
for (my $i = 0; $i <= 10; $i++) {
if ($ref->{ResultSet}->{Listing}->[$i]->{title}) { next; } else { $Count = $i - 1; }
}

# just a fail safe, in case we get more links than we actually want to show...
if ($Count > $Limit) { $Count = $Limit - 1; }

# now lets go through, and create the HTML for it...
my $html_links;
for (my $count = 0; $count <= $Count; $count++) {

# get the variables all setup...
my $Description = $ref->{ResultSet}->{Listing}->[$count]->{description};
my $Title = $ref->{ResultSet}->{Listing}->[$count]->{title};
my $URI = $ref->{ResultSet}->{Listing}->[$count]->{ClickUrl}->{content};
my $ClickURL = $ref->{ResultSet}->{Listing}->[$count]->{siteHost};

# put the links into HTML format...
$html_links .= Links::SiteHTML::display('overture_link', { Description => $Description, Title => $Title, URL => $URI, ShowURL => $ClickURL });

}

# now lets send it back to the template....
return $html_links;

}