blob: 776dc2c74ab4927e85ea321d36a53c884e76a915 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
|
# Example of sending via a connected udp socket
set s [socket dgram 127.0.0.1:20000]
foreach i [range 1 20] {
# Socket is connected, so can just use puts here
# But remember to flush to ensure that each message is separate
$s puts -nonewline "$i * $i"
$s flush
# Receive the response - max length of 100
puts [$s recvfrom 100]
}
|