>perl -v
This is perl 5, version 12, subversion 3 (v5.12.3) built for MSWin32-x86-multi-thread
...
Binary build 1204 [294330] provided by ActiveState http://www.ActiveState.com
...

>perl a.pl -port=12347
server:41930 client:41930 cycles: 597.742/secTerminating on signal SIGINT(2)

##</code><code>##

>netstat /a

Active Connections

  Proto  Local Address          Foreign Address        State
...
  TCP    127.0.0.1:12347        tribble:49157          TIME_WAIT
  TCP    127.0.0.1:12347        tribble:49159          TIME_WAIT
  TCP    127.0.0.1:12347        tribble:49161          TIME_WAIT
  TCP    127.0.0.1:12347        tribble:49162          TIME_WAIT
  TCP    127.0.0.1:12347        tribble:49163          TIME_WAIT
  TCP    127.0.0.1:12347        tribble:49164          TIME_WAIT
  TCP    127.0.0.1:12347        tribble:49165          TIME_WAIT
  TCP    127.0.0.1:12347        tribble:49166          TIME_WAIT
  TCP    127.0.0.1:12347        tribble:49167          TIME_WAIT
  TCP    127.0.0.1:12347        tribble:49168          TIME_WAIT
  TCP    127.0.0.1:12347        tribble:49169          TIME_WAIT
  TCP    127.0.0.1:12347        tribble:49170          TIME_WAIT
  TCP    127.0.0.1:12347        tribble:49171          TIME_WAIT
  TCP    127.0.0.1:12347        tribble:49172          TIME_WAIT
  TCP    127.0.0.1:12347        tribble:49173          TIME_WAIT
  TCP    127.0.0.1:12347        tribble:49174          TIME_WAIT
...