title: Can't create socket using IO::Socket
body: <p>when I run the following code, the execution is just hanging there, No response at all.
  does any of you can tell me what's wrong with the sample code?  </p>
  
  <pre><code>use strict;
  use warnings;
  use IO::Select;
  use IO::Socket;
  
  my $s = new IO::Socket (
                            LocalPort =&gt; 8889,
                            Proto  =&gt; 'tcp',
                            Listen =&gt; 16,
                            Reuse  =&gt; 1
                        );
  
  die "could not create socket $!\n" unless $s;
  </code></pre>