Simple feed reader using peco

00usage.md

• UNIX

     perl feed.pl | peco -null | xargs -r chromium-browser
  

• Windows

     perl feed.pl | peco --null | xargs -r start
  

feed.pl

use strict;
use warnings;

use XML::Feed;

my $feed = XML::Feed->parse(URI->new('http://qiita.com/tags/go/feed'))
  or die XML::Feed->errstr;
for my $entry ($feed->entries) {
  print $entry->title . "\0" . $entry->link . "\n";
}