# perl serv.pl 
assoc id  = 141
state     = 4
instrms   = 5
outstrms  = 5
New Client Connection
assoc id  = 48
state     = 91
instrms   = 0
outstrms  = 0
Sending to -1