Compare recv return value to peername in socket test
[perl #122657] TODO checking the result of recv() on hurd