Name "main::whois_socket" used only once: possible typo at ./whois.pl line 9.
expecting a handle at ./whois.pl line 5
Can't call method "debug" on an undefined value at ./whois.pl line 6.