- or download this
...
$kernel->yield('keepalive', $io_wheel, $kernel);
....
- or download this
...
keepalive => sub {
my ( $io_wheel, $kernel ) = @_[ ARG0, ARG1 ];
....
- or download this
keepalive => sub {
my ( $io_wheel, $kernel ) = @_[ ARG0, KERNEL ];
$io_wheel->put( "keepalive" );
$kernel->delay( 'keepalive' => 10, $io_wheel );
},