summaryrefslogtreecommitdiff
path: root/feeder.pl
diff options
context:
space:
mode:
Diffstat (limited to 'feeder.pl')
-rw-r--r--feeder.pl15
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');