Skip to content

Instantly share code, notes, and snippets.

@marcusramberg

marcusramberg/t

Created July 5, 2012 12:47
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save marcusramberg/3053496 to your computer and use it in GitHub Desktop.
Save marcusramberg/3053496 to your computer and use it in GitHub Desktop.
Download ZIP
hangs
Raw
t
#!/usr/bin/env perl
use Mojolicious::Lite;
get '/' => sub {
my $self=shift;
$self->render_later();
Mojo::IOLoop->client({address=>'vg.no',port=>80}=>sub {
my ($loop, $err, $stream) = @_;
$self->render(text=>'OK');
});
};
app->start;
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment