Select Code to Download

sub wait # simplified
{
...
    event_loop while not $lambda-> is_finished;
    return $lambda-> peek;
}

context $socket;
writable { Y }

syswrite $socket ....;
readable { Z }