Integrate from perlio:
Jarkko Hietaniemi [Mon, 13 Jan 2003 02:41:04 +0000 (02:41 +0000)]
[ 18470]
Fix #16306 and #16880

(#16306 Big Badda leak in Sockets)
(#16880 Memory leak with IO::Socket in Perl v5.8.0)
p4raw-link: @18470 on //depot/perlio: 9217ff3fe3ec1aad7b12d79198ffb9252d6908de

p4raw-id: //depot/perl@18474


Trivial merge