[2006/04/11,13:36:24] [lugh.ksh] [notice] Running command make cp Expect.pm blib/lib/Expect.pm cp Expect.pod blib/lib/Expect.pod Manifying blib/man3/Expect.3 [2006/04/11,13:36:25] [lugh.ksh] [notice] Running command make test PERL_DL_NONLAZY=1 /usr/bin/perl "-Iblib/lib" "-Iblib/arch" test.pl 1..36 Basic tests... Use of uninitialized value in ioctl at /usr/opt/perl5/lib/site_perl/5.8.2/aix-thread-multi/IO/Pty.p +m line 119. warning: TIOCSCTTY failed, slave might not be set as controlling terminal: A system call received a + parameter that is no t valid. at /usr/opt/perl5/lib/site_perl/5.8.2/aix-thread-multi/IO/Pty.pm line 120.

*** Expect-1.15/Expect.pm Tue Mar 19 12:59:29 2002 --- Expect-1.16/Expect.pm Fri May 5 13:30:06 2006 *************** *** 104,109 **** --- 104,112 ---- # set up pipe to detect childs exec error pipe(STAT_RDR, STAT_WTR) or die "Cannot open pipe: $!"; STAT_WTR->autoflush(1); + eval { + fcntl(STAT_WTR, F_SETFD, FD_CLOEXEC); + }; my $pid = fork;