4 my $url = $ENV{OPENSEARCH_URL};
6 Test::More->import(skip_all => "OPENSEARCH_URL not set");
10 # XXX This is not testing, but for debugging :)
15 my $engine = WWW::OpenSearch->new($url);
17 ok $engine->description->shortname, $engine->description->shortname;
19 my $res = $engine->search("iPod");
21 ok $res->feed->title, $res->feed->title;
22 ok $res->feed->link, $res->feed->link;
23 ok $res->pager->entries_per_page, "items per page " . $res->pager->entries_per_page;
24 ok $res->pager->total_entries, "total entries " . $res->pager->total_entries;