#!/usr/bin/env perl
use strict;
use warnings;
use 5.016;
use Feed;

my $feed_class = Feed->with_traits('Feed::Printer');
sub feed {
    my (%args) = @_;
    my $feed = $feed_class->new(%args);
    $feed->process;
}

feed(uri=>'http://www.gentoo.org/rdf/en/gentoo-news.rdf');
feed(uri=>'http://feeds2.feedburner.com/sydneypadua/yBZX');
