gistfile1.txt

use v5.10;
use Mojo::IOLoop;

say EV::now;
say localtime.': sleeping 5...';
sleep(2);
Mojo::IOLoop->one_tick; # updates EV::now
say EV::now;

say localtime.': register 5 sec timeout...';
Mojo::IOLoop->timer(2 => sub { say localtime.': timeout!'; shift->stop; });

say localtime.': starting ioloop...';
Mojo::IOLoop->start();

say localtime.': done';