Group Workshop

Test::RSS

use Test::More tests => 3;
use Test::RSS;
my $feed = parse_rss_ok( handle => \*STDIN );
rss_title_is( $feed, 'My RSS Feed' );
rss_item_count_is( $feed, 10 );