From 18024785860020d83b14b686c47ad7ef455f0da7 Mon Sep 17 00:00:00 2001 From: dakkar Date: Sun, 9 Dec 2012 12:43:09 +0000 Subject: sample structure --- feeder.pl | 15 +++++++++++++++ 1 file changed, 15 insertions(+) create mode 100644 feeder.pl (limited to 'feeder.pl') 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'); -- cgit v1.2.3