examples/unix.dgram.client

   1 # Example of sending from an unconnected socket
   2
   3 # Now sending via a connected udp socket
   4
   5 set s [socket unix.dgram unix.sock]
   6 $s buffering none
   7
   8 puts "dgram socket [$s sockname] connected to [$s peername]"
   9
  10 foreach i [range 5 10] {
  11         # Socket is connected, so can just use puts here
  12         # No need to flush because we set 'buffering none' above.
  13         $s puts -nonewline "$i * $i"
  14         #$s flush
  15
  16         # Receive the response - max length of 100
  17         puts [$s recvfrom 100]
  18 }