diff options
author | dakkar <dakkar@thenautilus.net> | 2012-12-09 12:43:09 +0000 |
---|---|---|
committer | dakkar <dakkar@thenautilus.net> | 2012-12-09 12:43:09 +0000 |
commit | 18024785860020d83b14b686c47ad7ef455f0da7 (patch) | |
tree | 61effebdf758601d8c70b6fc4cd116ddc5b1f62c /feeder.pl | |
parent | notes (diff) | |
download | feeder-18024785860020d83b14b686c47ad7ef455f0da7.tar.gz feeder-18024785860020d83b14b686c47ad7ef455f0da7.tar.bz2 feeder-18024785860020d83b14b686c47ad7ef455f0da7.zip |
sample structure
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'); |