#!perl -w use strict; use XML::Feed; use Test::More tests => 2; my $html = <<'EOD'; No Entries

No entries

EOD ok(my $feed = XML::Feed->parse(\$html), "Parsed the HTML"); is(scalar($feed->entries), 0, "Got 0 entries");