Pre 5.0 delay webapps

old_delay.pl

#!/usr/bin/env perl

use Mojolicious::Lite;
use Mojo::IOLoop;

get '/error' => sub {
  my $c = shift;
  $c->render_later;
  my $delay = Mojo::IOLoop->delay(
    sub { die 'Argh' },
    sub { $c->render( text => 'Lived!') },
  );
  $delay->on( error => sub { $c->render_exception });
  $delay->wait unless $delay->ioloop->is_running;
};

get '/pause' => sub {
  my $c = shift;
  $c->render_later;
  my $delay = Mojo::IOLoop->delay(
    sub { Mojo::IOLoop->timer(4 => shift->begin) },
    sub { $c->render(text => 'Hi after pause') if $c->tx },
  );
  $delay->wait unless $delay->ioloop->is_running;
};

app->start;

__DATA__

@@ pause.html.ep

This isn't what you mean