Help for this page
Select Code to Download
Select
or
download this
#!/usr/bin/perl ... print "\n Socket closed."; print "\n"; die;