История изменений
Исправление
gh0stwizard,
(текущая версия)
:
$ echo "wow" | nc -l -s 127.0.0.1 -p 8888 &
[1] 9104 9105
$ tclsh tcp.tcl
wow
=1+2+3$
[1] + 9104 done echo "wow" |
9105 done nc -l -s 127.0.0.1 -p 8888
$ cat tcp.tcl
#!/usr/bin/env tclsh
set addr {127.0.0.1}
set port 8888
set chan [socket $addr $port]
puts $chan {=1+2+3$}
flush $chan
puts [gets $chan]
Исходная версия
gh0stwizard,
:
Все работает
$ echo "wow" | nc -s 127.0.0.1 8888 &
[1] 9104 9105
$ tclsh tcp.tcl
wow
=1+2+3$
[1] + 9104 done echo "wow" |
9105 done nc -l -s 127.0.0.1 -p 8888
$ cat tcp.tcl
#!/usr/bin/env tclsh
set addr {127.0.0.1}
set port 8888
set chan [socket $addr $port]
puts $chan {=1+2+3$}
flush $chan
puts [gets $chan]