my $lis = IO::Socket::INET->new(LocalPort => $portnumber, Listen => 10 ); [download]
$lis->close(); [download]
In reply to Closing IO::Socket::INET by Anonymous Monk