----
Information about [Roy Keene]
My [Scratchpad]
Random [Links]
Feel free to contact me about this website at mailto:wiki@rkeene.org
Random [Demonstrations]
Information about [Tcl]
My [Friends]
Information about [Random Number Generation]
Random [Diatribes]
Information about [Threads]
Random [Scripts]
Information about interesting [Current Projects]
'''What you will find here'''
** [Tcl Quine] **
A Quine [http://en.wikipedia.org/wiki/Quine_%28computing%29] is a program that produces its code as output. Quines can be written in almost any language. Gary P. Thompson II has a large collection of quines [http://www.nyx.net/~gthompso/quine.htm] [http://www.rkeene.org/projects/info/resources/tcl/quine/quine.htm]
----
Below is a very simple to understand quine written in [Tcl]
#! /usr/bin/env tclsh
proc MySelf {} {
puts {#! /usr/bin/env tclsh}
puts {}
puts -nonewline "proc MySelf {} {"
puts -nonewline [info body MySelf]
puts "}"
puts ""
puts "MySelf"
}
MySelf