Быстрый вопрос.
Как я могу вызвать Perl-скрипт (используя аргументы) в tcl, собрать выходные данные и сохранить их в переменной, которая позже будет распечатана в IRC (с использованием eggdrop).
Спасибо! =)
просто: set perl_output [exec perl -lane {perl_script(goes => $here)} file]
set perl_output [exec perl -lane {perl_script(goes => $here)} file]
Обычно в Tcl для этого используется что-то вроде exec или open.Смотрите документацию по exec: http://www.tcl.tk/man/tcl8.5/TclCmd/exec.htm и open: http://www.tcl.tk/man/tcl8.5/TclCmd/open.htm
Если вы не хотите запускать внешний интерпретатор perl, вы можете получить пакет tclperl и просто запустить его встроенным, может быть быстреетоже: http://jfontain.free.fr/tclperl.htm (см. эту ссылку для источников: http://jfontain.free.fr/tclperl-3.2.tar.bz2)