use v6; react { whenever IO::Socket::Async.listen('0.0.0.0', 3333) -> $conn { my $time = now; whenever Supply.interval(1) { if now - $time > 4 { $conn.print("TIMEOUT\n"); $conn.close; } } whenever $conn.Supply.lines -> $line { $time = now; $conn.print("$line\n"); } } whenever signal(SIGINT) { done(); exit; } }