Select Code to Download

Client --> P
Client --> R
Client --> O ------> Single Conn Server
Client --> X
Client --> Y

use IO::Select;
use IO::Socket;
...
    $fh->close;
    $count--;
}