'\" '\" Copyright (c) 1993 The Regents of the University of California. '\" Copyright (c) 1994-1996 Sun Microsystems, Inc. '\" '\" See the file "license.terms" for information on usage and redistribution '\" of this file, and for a DISCLAIMER OF ALL WARRANTIES. '\" '\" '\" The definitions below are for supplemental macros used in Tcl/Tk '\" manual entries. '\" '\" .AP type name in/out ?indent? '\" Start paragraph describing an argument to a library procedure. '\" type is type of argument (int, etc.), in/out is either "in", "out", '\" or "in/out" to describe whether procedure reads or modifies arg, '\" and indent is equivalent to second arg of .IP (shouldn't ever be '\" needed; use .AS below instead) '\" '\" .AS ?type? ?name? '\" Give maximum sizes of arguments for setting tab stops. Type and '\" name are examples of largest possible arguments that will be passed '\" to .AP later. If args are omitted, default tab stops are used. '\" '\" .BS '\" Start box enclosure. From here until next .BE, everything will be '\" enclosed in one large box. '\" '\" .BE '\" End of box enclosure. '\" '\" .CS '\" Begin code excerpt. '\" '\" .CE '\" End code excerpt. '\" '\" .VS ?version? ?br? '\" Begin vertical sidebar, for use in marking newly-changed parts '\" of man pages. The first argument is ignored and used for recording '\" the version when the .VS was added, so that the sidebars can be '\" found and removed when they reach a certain age. If another argument '\" is present, then a line break is forced before starting the sidebar. '\" '\" .VE '\" End of vertical sidebar. '\" '\" .DS '\" Begin an indented unfilled display. '\" '\" .DE '\" End of indented unfilled display. '\" '\" .SO '\" Start of list of standard options for a Tk widget. The '\" options follow on successive lines, in four columns separated '\" by tabs. '\" '\" .SE '\" End of list of standard options for a Tk widget. '\" '\" .OP cmdName dbName dbClass '\" Start of description of a specific option. cmdName gives the '\" option's name as specified in the class command, dbName gives '\" the option's name in the option database, and dbClass gives '\" the option's class in the option database. '\" '\" .UL arg1 arg2 '\" Print arg1 underlined, then print arg2 normally. '\" '\" # Set up traps and other miscellaneous stuff for Tcl/Tk man pages. .if t .wh -1.3i ^B .nr ^l \n(.l .ad b '\" # Start an argument description .de AP .ie !"\\$4"" .TP \\$4 .el \{\ . ie !"\\$2"" .TP \\n()Cu . el .TP 15 .\} .ta \\n()Au \\n()Bu .ie !"\\$3"" \{\ \&\\$1 \\fI\\$2\\fP (\\$3) .\".b .\} .el \{\ .br .ie !"\\$2"" \{\ \&\\$1 \\fI\\$2\\fP .\} .el \{\ \&\\fI\\$1\\fP .\} .\} .. '\" # define tabbing values for .AP .de AS .nr )A 10n .if !"\\$1"" .nr )A \\w'\\$1'u+3n .nr )B \\n()Au+15n .\" .if !"\\$2"" .nr )B \\w'\\$2'u+\\n()Au+3n .nr )C \\n()Bu+\\w'(in/out)'u+2n .. .AS Tcl_Interp Tcl_CreateInterp in/out '\" # BS - start boxed text '\" # ^y = starting y location '\" # ^b = 1 .de BS .br .mk ^y .nr ^b 1u .if n .nf .if n .ti 0 .if n \l'\\n(.lu\(ul' .if n .fi .. '\" # BE - end boxed text (draw box now) .de BE .nf .ti 0 .mk ^t .ie n \l'\\n(^lu\(ul' .el \{\ .\" Draw four-sided box normally, but don't draw top of .\" box if the box started on an earlier page. .ie !\\n(^b-1 \{\ \h'-1.5n'\L'|\\n(^yu-1v'\l'\\n(^lu+3n\(ul'\L'\\n(^tu+1v-\\n(^yu'\l'|0u-1.5n\(ul' .\} .el \}\ \h'-1.5n'\L'|\\n(^yu-1v'\h'\\n(^lu+3n'\L'\\n(^tu+1v-\\n(^yu'\l'|0u-1.5n\(ul' .\} .\} .fi .br .nr ^b 0 .. '\" # VS - start vertical sidebar '\" # ^Y = starting y location '\" # ^v = 1 (for troff; for nroff this doesn't matter) .de VS .if !"\\$2"" .br .mk ^Y .ie n 'mc \s12\(br\s0 .el .nr ^v 1u .. '\" # VE - end of vertical sidebar .de VE .ie n 'mc .el \{\ .ev 2 .nf .ti 0 .mk ^t \h'|\\n(^lu+3n'\L'|\\n(^Yu-1v\(bv'\v'\\n(^tu+1v-\\n(^Yu'\h'-|\\n(^lu+3n' .sp -1 .fi .ev .\} .nr ^v 0 .. '\" # Special macro to handle page bottom: finish off current '\" # box/sidebar if in box/sidebar mode, then invoked standard '\" # page bottom macro. .de ^B .ev 2 'ti 0 'nf .mk ^t .if \\n(^b \{\ .\" Draw three-sided box if this is the box's first page, .\" draw two sides but no top otherwise. .ie !\\n(^b-1 \h'-1.5n'\L'|\\n(^yu-1v'\l'\\n(^lu+3n\(ul'\L'\\n(^tu+1v-\\n(^yu'\h'|0u'\c .el \h'-1.5n'\L'|\\n(^yu-1v'\h'\\n(^lu+3n'\L'\\n(^tu+1v-\\n(^yu'\h'|0u'\c .\} .if \\n(^v \{\ .nr ^x \\n(^tu+1v-\\n(^Yu \kx\h'-\\nxu'\h'|\\n(^lu+3n'\ky\L'-\\n(^xu'\v'\\n(^xu'\h'|0u'\c .\} .bp 'fi .ev .if \\n(^b \{\ .mk ^y .nr ^b 2 .\} .if \\n(^v \{\ .mk ^Y .\} .. '\" # DS - begin display .de DS .RS .nf .sp .. '\" # DE - end display .de DE .fi .RE .sp .. '\" # SO - start of list of standard options .de SO .SH "STANDARD OPTIONS" .LP .nf .ta 5.5c 11c .ft B .. '\" # SE - end of list of standard options .de SE .fi .ft R .LP See the \\fBoptions\\fR manual entry for details on the standard options. .. '\" # OP - start of full description for a single option .de OP .LP .nf .ta 4c Command-Line Name: \\fB\\$1\\fR Database Name: \\fB\\$2\\fR Database Class: \\fB\\$3\\fR .fi .IP .. '\" # CS - begin code excerpt .de CS .RS .nf .ta .25i .5i .75i 1i .. '\" # CE - end code excerpt .de CE .fi .RE .. .de UL \\$1\l'|0\(ul'\\$2 .. .TH tclsh 1 "" Tcl "Tcl Applications" .BS '\" Note: do not modify the .SH NAME line immediately below! .SH NAME tclsh \- 包含 Tcl 直譯器的簡單的 shell .SH "總覽 SYNOPSIS" \fBtclsh\fR ?\fIfileName arg arg ...\fR? .BE .SH "描述" .PP \fBTclsh\fR 是一個 shell 類應用程式,從它的標準輸入或一個檔案讀 Tcl 命令並對其求值(evaluate)。 如果你不加引數的呼叫,則它互動式的執行,從標準輸入讀 Tcl 命令並向標準輸出列印命令結果和出錯資訊。它一直執行直到呼叫 \fBexit\fR 命令或在它的標準輸入上讀到檔案結束。如果在使用者的主(home)目錄裡存在一個檔案 \fB.tclshrc\fR (或在 Windows 平臺上的 \fBtclshrc.tcl\fR),在從標準輸入讀第一條命令之前,\fBtclsh\fR 把這個檔案作為一個 Tcl 指令碼來求值。 .SH "指令碼檔案 SCRIPT FILES" .PP 如果加引數呼叫 \fBtclsh \fR則第一個引數是指令碼檔案的名字而任何額外的引數作為給指令碼使用的變數(見後)。 \fBtclsh\fR 將從指名的檔案中讀 Tcl 命令而不是從標準輸入讀取;當到達檔案結束時 \fBtclsh\fR 將退出。在這種情況下不自動的對 \fB.tclshrc\fR 求值,如果需要的話,指令碼檔案總是可以 \fBsource\fR(包含)它。 .PP 如果你建立的 Tcl 指令碼檔案的第一行是 .CS \fB#!/usr/local/bin/tclsh\fR .CE 則如果你把它標記為可執行的,接著就可以直接在你的 shell 中呼叫這個指令碼檔案。這裡假定了\fB tclsh\fR 被安裝在預設的位置 /usr/local/bin;如果它被安裝在其他地方,那麼你需要修改上述行來匹配之。許多 UNIX 系統不允許 \fB#!\fR 行超出 30 個字元的長度,所以要確定 \fBtclsh\fR 可執行檔案能被用短檔名訪問。 .PP 一個更好的途徑是用下面三行來開始你的指令碼檔案: .CS \fB#!/bin/sh # the next line restarts using tclsh \e exec tclsh "$0" "$@"\fR .CE 這種方法比起前面的段落有三個好處。首先,\fBtclsh\fR 二進位制檔案的位置不需要填入(hard-wired into) 指令碼中: 它可以在你的 shell 查詢路徑中的任何地方。其次,他超越了(get around)了上種方法的 30 字元的檔名的限制。第三,這種方法在 \fBtclsh\fR 自身也是 shell 指令碼時仍可執行(一些系統要處理多體系或作業系統: \fBtclsh\fR 指令碼選擇某個二進位制檔案來執行)。第三行導致 \fBsh\fR 和 \fBtclsh\fR 兩者來處理指令碼,但 \fBexec\fR 只被 \fBsh \fR執行。 \fBsh\fR 首先處理指令碼檔案;它把第二行作為指令碼檔案對待並執行第三行。\fBexec\fR 語句導致 shell 停止處理而啟動 \fBtclsh\fR 來重新處理整個指令碼。當 \fBtclsh\fR 啟動時,因為第二行的反斜線導致第三行被作為第二行註釋的一部分,它把所有三行都作為註釋對待。 .PP .VS You should note that it is also common practise to install tclsh with its version number as part of the name. This has the advantage of allowing multiple versions of Tcl to exist on the same system at once, but also the disadvantage of making it harder to write scripts that start up uniformly across different versions of Tcl. .VE .SH "變數 VARIABLES" .PP \fBTclsh\fR 設定了下列 Tcl 變數: .TP 15 \fBargc\fR 包含 \fIarg\fR 引數的個數(沒有則為 0),不包括指令碼檔案的名字。 .TP 15 \fBargv\fR 包含一個 Tcl 列表,其元素依次是 \fIarg\fR 引數,如果沒有 \fIarg\fR 引數則是一個空串。 .TP 15 \fBargv0\fR 如果指定了 \fIfileName\fR 則在此包含。否則。包含呼叫 \fBtclsh\fR 使用的名字。 .TP 15 \fBtcl_interactive\fR 如果互動式執行 \fBtclsh\fR 則包含 1(不指定\fIfileName\fR 並且標準輸入是一個終端類裝置),否則是 0。 .SH "提示符 PROMPTS" .PP 當互動式的呼叫 \fBtclsh\fR 時,它通常為每條命令提示\(lq\fB%\fR\(rq。你可以透過設定變數 \fBtcl_prompt1\fR 和 \fBtcl_prompt2\fR 來改變提示符。如果存在變數 \fBtcl_prompt1\fR 則它必須由一個輸出一個提示符的 Tcl 指令碼組成;\fBtclsh\fR 對 \fBtcl_prompt1\fR 中的指令碼求值而不是輸出一個提示符。變數 \fBtcl_prompt2\fR 以類似的方式用在鍵入了換行而當前命令卻不完整的時候;如果沒設定 \fBtcl_prompt2\fR 則對不完整的命令不給以提示符。 .SH "關鍵字 KEYWORDS" argument, interpreter, prompt, script file, shell .SH "[中文版維護人]" .B 寒蟬退士 .SH "[中文版最新更新]" .B 2001/06/20 .SH "《中國linux論壇man手冊頁翻譯計劃》:" .BI http://cmpp.linuxforum.net .SH "跋" .br 本頁面中文版由中文 man 手冊頁計劃提供。 .br 中文 man 手冊頁計劃:\fBhttps://github.com/man-pages-zh/manpages-zh\fR