Tcl / Tk простой способ написания небольших графических интерфейсов

Может ли кто-нибудь дать хороший пример скнопка итекст виджет. Когда кнопка нажата, должна ли быть выполнена команда оболочки и вывод передан втекст виджет.

Если у вас есть другие хорошие и чистые примеры для полезных задач, пожалуйста, добавьте их тоже.