diff options
Diffstat (limited to 'feeder.pl')
-rw-r--r-- | feeder.pl | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/feeder.pl b/feeder.pl new file mode 100644 index 0000000..61f73be --- /dev/null +++ b/feeder.pl @@ -0,0 +1,15 @@ +#!/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'); |