perl6 io :: socket :: inet如何为socket设置超时？

Question

my $c = IO::Socket::INET.new(:host<localhost>, :port(80));
$c.print: 'Test';
say $c.recv;

如何为IO :: Socket :: INET recv设置超时？

Answer 1

请参阅Promise.anyof doc中的超时示例。

（有关跟踪进度的更一般情况，另请参阅Concurrent::Progress。）