To run tcl:
user@host $ docker run -i -t aidanhs/tcl:7.3
root@container $ tclsh
% info tclversion
7.3
To run Tk (don't do this on multi-user environments, see dockerfile for details):
user@host $ xhost + && docker run -e DISPLAY=:0 -v /tmp/.X11-unix:/tmp/.X11-unix:ro -i -t aidanhs/tcl:7.3 && xhost -
root@container $ wish # A window should pop up
% canvas .c -width 200 -height 200 -bg pink
.c
% pack .c
% set i [.c create polygon 100 55 75 33 35 45 20 100 100 170 100 170 180 100 165 45 125 33 100 55 100 55]
1
% .c itemconfigure $i -smooth true -fill red
% # See window
You can try this more advanced Tk demo, just comment out tkwait visibility . near the end.
Content type
Image
Digest
sha256:52d8c8c78…
Size
179.6 MB
Last updated
almost 11 years ago
docker pull aidanhs/tcl:7.3