Help for this page
my $sel = new IO::Select $sock;
require IO::Select;
my $sel = IO::Select->new($sock);
my $sel = new($sock->IO::Select());
use IO::Select;