Help for this page
if (//data to read) { $loop->loop_once; }
use IO::Async::Timer::Periodic; ... $loop->add( $timer ); $loop->run;