# New Ticket Created by Tobias Leich # Please include the string: [perl #122318] # in the subject line of all future correspondence about this issue. # <URL: https://rt.perl.org/Ticket/Display.html?id=122318 >
perl6-m t/spec/S32-io/IO-Socket-Async.t 1..6 ok 1 - Async listen on bogus hostname ok 2 - Async connect to unavailable server breaks promise ok 3 - Async connect to available server keeps promise ok 4 - Echo server ok 5 - Discard server not ok 6 - bytes_supply When this happens then $binary has 4096 elements, $received only has one (an empty string).