Skip to content

Instantly share code, notes, and snippets.

@jberger

jberger/signal.pl

Created January 23, 2017 20:52
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 jberger/a9aa430ce0a069f5f8b10b8a65a0cc97 to your computer and use it in GitHub Desktop.
Save jberger/a9aa430ce0a069f5f8b10b8a65a0cc97 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
signal.pl
use Mojo::Base -strict;
use Mojo::EventEmitter;
use Mojo::IOLoop;
my $bus = Mojo::EventEmitter->new;
$SIG{HUP} = sub {
Mojo::IOLoop->next_tick(sub{ $bus->emit('HUP') });
};
$bus->on(HUP => sub { warn 'HUP' });
Mojo::IOLoop->recurring(5 => sub { warn 'ping' });
Mojo::IOLoop->start;
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment