D7net
Home
Console
Upload
information
Create File
Create Folder
About
Tools
:
/
proc
/
thread-self
/
root
/
opt
/
lampp
/
share
/
doc
/
gettext
/
examples
/
hello-tcl
/
Filename :
hello.tcl
back
Copy
#!@TCLSH@ # Example for use of GNU gettext. # This file is in the public domain. # # Source code of the Tcl program. package require msgcat ::msgcat::mcload [file join "@pkgdatadir@" "msgs"] proc _ {s} {return [::msgcat::mc $s]} puts [_ "Hello, world!"] puts [format [_ "This program is running as process number %d."] [pid]]