tclperl 是一个 Tcl 的扩展包。可以用来在 Tcl 中解释执行 Perl 语法。
根据 tclperl 的网站 的介绍,用法大致如下
package require tclperl
set interpreter [perl::interp new]
$interpreter eval {print "Hello World\n"}
perl::interp delete $interpreter
它还允许在所执行的Perl语句中调用 Tcl 。比如:
package require tclperl 3
set interpreter [perl::interp new]
puts [$interpreter eval {
$Tcl::parent->eval('clock format [clock seconds]');
}]
perl::interp delete $interpreter
tclperl 的作者还有其他作品,比如 stooop —— 用于 Tcl 中构建类;tkpiechart —— 用 Tk 画饼图;等。