Skip to content

Instantly share code, notes, and snippets.

@kraih
Last active September 5, 2015 09:34
Show Gist options
  • Star 1 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save kraih/471633 to your computer and use it in GitHub Desktop.
Save kraih/471633 to your computer and use it in GitHub Desktop.
use Mojolicious::Lite;
my $feed = 'http://blog.kraih.com/rss.xml';
get '/blog/atom/perl/atom.xml' => sub {
my $self = shift;
$self->ua->max_redirects(5)->get($feed => sub {
$self->render(text => shift->res->body, format => 'rss');
});
};
app->start;
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment