Help for this page

Select Code to Download

Select or download this

use IO::Socket::INET;
use strict;
...
 print "\nReceived message From:$text";
 goto COND;
}

Select or download this
```
[SEND]
REGISTER
[RECV]
100
[RECV]
200
```