[MC]: The various [TeX] variants are very powerful ways to typeset documents. (My favorites are http://wiki.contextgarden.net/XeTeX%|%ConTeXt & XeTeX%|%.) Most of my projects involve typesetting data that is retrieved out of a database, so Tcl is my go to language. I can write a script that reads the data and marks it up, then render it to PDF, see if I like it, and tweak as necessary until I have something I'm happy with. Since TeX commands look like `\command[[argument]][[arg2...]]` the backslash and brackets would need to be escaped for the Tcl interpreter, and that gets tiresome rather quickly. Hence the following small package that allows me to write TeX in a Tcl-ish way: `@ command `. ====== namespace eval TeXutil { variable buf "" variable map {@ \\ & & < < > > &at; @ < \[ > \] ( \{ ) \}} proc @ {cmd args} { >> @$cmd[join $args ""]\n } proc %@ {cmd args} { % @$cmd {*}$args } proc >> {args} { variable buf variable map foreach datum $args { append buf [string map -nocase $map $datum] } } proc << {} { variable buf set out $buf set buf "" return $out } proc % {args} { >> %[join [split [join $args " "] \n] \n%]\n } namespace export << %@ @ % >> namespace ensemble create } package provide TeXutil 1.0 ====== So the script: ====== namespace import TeXutil::* @ setuppapersize @ starttext >> "Hello world" \n @ stoptext puts [<<] ====== Would produce: ======none \setuppapersize[A6] \starttext Hello world \stoptext ====== [AMG]: I added () -> {} mapping for the sake of [LaTeX]. <> Word and Text Processing