#!/usr/bin/perluse strict;use warnings FATAL => 'all';use v5.10;use Mojolicious::Lite;get '/' => sub { my $c = shift->render_later; $c->ua->get('http://google.com' => sub { $c->render(text => 'Ok'); });};app->start;