X-Git-Url: https://git.exim.org/exim.git/blobdiff_plain/f77cff22db0bbb4d71a16becb5512e19d86ed63a..ee549a2ed04164407f4f897be3bf545f32579c5c:/test/aux-fixed/0601.udpserver diff --git a/test/aux-fixed/0601.udpserver b/test/aux-fixed/0601.udpserver index 5513402b0..31ff65262 100644 --- a/test/aux-fixed/0601.udpserver +++ b/test/aux-fixed/0601.udpserver @@ -18,5 +18,6 @@ $select = IO::Select->new($socket) or die "IO::Select $!"; if (scalar ($select->can_read(5)) == 1) { $socket->recv($recieved_data,1024); + select(undef, undef, undef, 1); print "received: $recieved_data\n"; }