in reply to a dumb socket question

use IO::Select;
use IO::Socket;

Update: Converted to CPAN links

In Section Seekers of Perl Wisdom