Joerg Behrend wrote:
> Unter perl-5.8.0, the perl debugger is hanging after
> issuing the spawn command in the perl test script shown below
> (called from a terminal window with perl -d).
> Under perl-5.6.0, debugging the same script works fine.
I don't think this is an Expect-related problem, I'd rather guess this
is a problem with the debugger in 5.8.0 given the fact that there are
plans to rewirte it from scratch...
Spawn does a fork() and this is where the debuggers problems probably
comes from, I'd guess that the debugger also has this problem with code
that does a simle fork(), without the Expect package loaded. (Actually
I'm astonished that debugging spawn() works at all in 5.6.0...)
Servus aus Wien!
Roland
> The script was tested using Redhat Linux 8.0 (Intel i386) and
> Redhat Advanced Server 2.1 (Itanium 2) with this result.
>
> Under Solaris 8, debugging works with both perl-5.8.0 and perl-5.6.0 .
>
> Since we are migrating to perl-5.8.0, it would be nice to have the
> full debugging capability also under this version.
>
> Joerg Behrend
> Mathematisches Institut Universitaet Koeln
>
>
> Perl test script:
>
> use strict;
> use Expect;
>
> $Expect::Debug=2;
> $Expect::Exp_Internal=1;
>
>
> my ($exp_fwatch);
> my ($s_sys) = "bash";
>
> $exp_fwatch = new Expect();
> $exp_fwatch->raw_pty(1);
> $exp_fwatch->spawn($s_sys);
>
> # this part is not reached if perldb is hanging
> print "after expect spawn\n";
>
>
>
>
>
> -------------------------------------------------------
> This sf.net email is sponsored by:ThinkGeek
> Welcome to geek heaven.
> http://thinkgeek.com/sf
> _______________________________________________
> Expectperl-discuss mailing list
> Exp...@li...
> https://lists.sourceforge.net/lists/listinfo/expectperl-discuss
>
|