From: Robin L. P. <rlp...@di...> - 2010-07-21 20:17:45
|
On Wed, Jul 21, 2010 at 04:07:17PM -0400, Jonathan wrote: > I had some requests for and to try; much appreciated. Here is the feedback: > > 1. Expect opening code: > > sub new > { > my $class = shift; > my $exp=Expect->new; > my $spawn_ok = 1; > > #$exp->raw_pty(1); > #$exp->debug($vars{"debug"}); > $exp->log_stdout(1); > $exp->spawn("$AnyConnectShellWrapper::Shell_Path") or die "Cannot spawn > vpn shell $AnyConnectShellWrapper::Shell_Path : $!\n"; Since I have no idea how this creates a terminal or how it connects to it, I'm afraid that doesn't really help. -Robin |