#!/usr/bin/env tclsh
puts {ДЕНЬ КОМПЬЮТЕРЩИКА}
puts {ПОЗДРАВЛЯЮ}
puts {ДЕВОЧКИ НЕ ДАЮТ, ДА?}
puts {НИЧЁ, БЫВАЕТ}
puts {МОЖЕТ, ХОЧЕШЬ ПОПРОГРАММИРОВАТЬ НА TCL?}
puts {НЕТ?}
puts {ВИДИШЬ, Я ТОЖЕ НЕСЧАСТЕН!..}
puts {...}
puts {КОЗЁЛ...}