M.Srinivasa Rao wrote:
> Presently I am working on windows OS.I have Perl and Tcl software in my
> system. I want invoke the Tcl interpreter from the perl script and execute
> the Pkg_mkIndex utility and return to perl script.
> I am able to invoke the Tcl interpreter from shell script using the
> following lines of statements.
> ##########################
> #! /usr/tcl/bin/tclsh8.0
> pkg_mkIndex . *.tcl
> exit
> #########################
> Like this I want to invoke tclsh and wish from the perl script.
If you have the Tcl module for Perl working, then you would
just instantiate the interpreter, like so:
my $interp = new Tcl;
and you can call anything in Tcl with the various methods:
$interp->call("pkg_mkIndex", ".", "*.tcl");
or
$interp->Eval("pkg_mkIndex . *.tcl");
the Tcl pwd should match Perl's.
--
Jeff Hobbs, The Tcl Guy
http://www.ActiveState.com/, a division of Sophos
|