
  sock = pnet( 'tcpsocket', port);
  pnet( sock, 'setreadtimeout', 1);
  con = pnet( sock, 'tcplisten');
  pnet( con, 'setreadtimeout', 2); 
  pnet( con, 'setwritetimeout', 1);  

  Str = pnet( con, 'readline');

  pnet( con, 'close');
  pnet( sock, 'close');

...

  pnet( con, 'printf', '...');

...

  pnet( con, 'write', data);


new usage:
**********

  sock = pnet( 'tcpsocket', port)   -> int pnet_tcpsocket( int port)

  pnet( sock, 'setreadtimeout', 1)  -> void pnet_setreadtimeout( int sock, int timeout)

  con = pnet( sock, 'tcplisten')    -> int pnet_tcplisten( int sock, int option)  

  pnet( con, 'setwritetimeout', 1)  -> void pnet_setwritetimeout( int con, int timeout)

  Str = pnet( con, 'readline')      -> char *pnet_readline( int con)

  pnet( con, 'close')               -> pnet_close( int sock)

  pnet( con, 'printf', '...');      -> pnet_printf( int con, char *msg)

