我正在tclsh
中试验TCL命令exec
,这是我的结果:
% set show_me_dir "ls"
ls
% exec $show_me_dir
VboxSharedFolder
% set show_me_dir "ls -la"
ls -la
% exec $show_me_dir
couldn't execute "ls -la": no such file or directory
% set show_me_dir {ls -la}
ls -la
% exec $show_me_dir
couldn't execute "ls -la": no such file or directory
% ls -la
total 141
d---------+ 1 wakatana Domain Users 0 Jan 22 19:12 .
d---------+ 1 wakatana Domain Users 0 Apr 16 2014 ..
----------+ 1 wakatana Domain Users 20214 Jan 23 18:43 .bash_history
----------+ 1 wakatana Domain Users 1494 Apr 15 2014 .bash_profile
----------+ 1 wakatana Domain Users 7593 Jan 22 19:03 .bashrc
d---------+ 1 wakatana Domain Users 0 Jan 15 14:56 VboxSharedFolder
%
有人可以解释一下我如何用参数执行命令吗?
编辑:
下面的例子来自 扩展 Tcl 和 eval 中的参数列表 文章让我们大开眼界:
变量$action
只有在命令行拆分为其各个参数后"piemiddle apple"
扩展为字符串:
% set action {piemiddle apple}
% set $action
can't read "piemiddle apple": no such variable
结果:set
命令"看到"一个参数,相当于:
% set {piemiddle apple}
展开运算符允许您指定在将命令行拆分为单个参数之前要展开变量:
% set action {piemiddle apple}
% set {*}$action
apple
结果:set
命令"看到"两个参数,相当于:
% set piemiddle apple
在早期版本的 Tcl 中,eval 命令是推荐的替代方法,并且今天仍然可用。
% set action {piemiddle apple}
% eval set $action
apple
另一个证明扩展运算符功能的例子:
% set {*}"name Linus"
Linus
% puts $name
Linus
%
%
% set distro Unbuntu
Unbuntu
% set {*}"linux $distro"
Unbuntu
% puts $linux
Unbuntu
%
%
最后发现exec
需要命令作为第一个参数和第一个命令选项作为第二个参数等。
% exec "ls" "-la"
total 137
d---------+ 1 wakatana Domain Users 0 Jan 22 19:12 .
d---------+ 1 wakatana Domain Users 0 Apr 16 2014 ..
----------+ 1 wakatana Domain Users 20214 Jan 23 18:43 .bash_history
----------+ 1 wakatana Domain Users 1494 Apr 15 2014 .bash_profile
----------+ 1 wakatana Domain Users 7593 Jan 22 19:03 .bashrc
d---------+ 1 wakatana Domain Users 0 Jan 15 14:56 VboxSharedFolder
%
%
% exec "ls -la"
couldn't execute "ls -la": no such file or directory
为 exec
构建命令的最安全方法是使用 Tcl 的list
。例如:
% set tcl_version
8.5
% set cmd [list ls -l tmp]
ls -l tmp
% eval exec $cmd
total 32
-rw-r--r-- 1 pynexj staff 1176 Jan 23 23:24 file.txt
-rw-r--r-- 1 pynexj staff 1176 Jan 23 23:24 foo-1.dat
-rw-r--r-- 1 pynexj staff 1176 Jan 23 23:24 foo-2.dat
-rw-r--r-- 1 pynexj staff 1176 Jan 23 23:24 foo-3.dat
% exec {*}$cmd
total 32
-rw-r--r-- 1 pynexj staff 1176 Jan 23 23:24 file.txt
-rw-r--r-- 1 pynexj staff 1176 Jan 23 23:24 foo-1.dat
-rw-r--r-- 1 pynexj staff 1176 Jan 23 23:24 foo-2.dat
-rw-r--r-- 1 pynexj staff 1176 Jan 23 23:24 foo-3.dat
%
请注意,{*} 是 Tcl 8.5 的新语法,可以帮助减少 eval
的使用。
作为ls
命令的示例,您可以执行以下操作:
exec {*}ls -lsa {*}[glob *.cpp]
请看一下 {*} 在 TCL 中做什么?