作者kornelius (c9s)
看板Perl
标题Re: [问题] 请问有关perl使用Tcl扩充模组的问题
时间Tue Apr 28 09:53:17 2009
http://search.cpan.org/~micb/Tcl-b2/Tcl.pm
Eval (STRING)
Evaluate script STRING in the interpreter.
If the script returns successfully (TCL_OK) then the
Perl return value corresponds to interp->result otherwise a
die exception is raised with the $@ variable corresponding
to interp->result. In each case, corresponds means that if
the method is called in scalar context then the
string interp->result is returned
but if the method is called in list context
then interp->result is split as a Tcl list and returned as a Perl list.
※ 引述《albertliao (~咖啡瘾君子~)》之铭言：
: 小弟想要使用perl去执行tcl , 简易程式如下:
: use Tcl;
: $interp = new Tcl;
: $interp->Eval('source c:/test.tcl');
: 虽然console有回应结果,但是却无法get到它的结果, 因为我是要取得结果再作处理
: 不晓得是否有人知道该如何去得结果
: 谢谢
--
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 113.61.194.203