C:\perl561\bin>perl5.6.1 -V Summary of my perl5 (revision 5 version 6 subversion 1) configuration: Platform: osname=MSWin32, osvers=4.0, archname=MSWin32-x86-multi-thread uname='' config_args='undef' hint=recommended, useposix=true, d_sigaction=undef usethreads=undef use5005threads=undef useithreads=define usemultiplicity=define useperlio=undef d_sfio=undef uselargefiles=undef usesocks=undef use64bitint=undef use64bitall=undef uselongdouble=undef Compiler: cc='cl', ccflags ='-nologo -O1 -MD -Zi -DNDEBUG -DWIN32 -D_CONSOLE -DNO_STRICT -DHAVE_DES_FCRYPT -DPERL_IMPLICIT_CONTEXT -DPERL_IMPLICIT_SYS -DPERL_MSVCRT_READFIX', optimize='-O1 -MD -Zi -DNDEBUG', cppflags='-DWIN32' ccversion='', gccversion='', gccosandvers='' intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=1234 d_longlong=undef, longlongsize=8, d_longdbl=define, longdblsize=10 ivtype='long', ivsize=4, nvtype='double', nvsize=8, Off_t='off_t', lseeksize=4 alignbytes=8, usemymalloc=n, prototype=define Linker and Libraries: ld='link', ldflags ='-nologo -nodefaultlib -debug -opt:ref,icf -libpath:"c:\perl561\lib\CORE" -machine:x86' libpth="c:\cl\lib" "C:\HLA\hlalib" "" "c:\hla\hlalib" "c:\perl561\\lib\CORE" libs= oldnames.lib kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib netapi32.lib uuid.lib wsock32.lib mpr.lib winmm.lib version.lib odbc32.lib odbccp32.lib msvcrt.lib perllibs= oldnames.lib kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib netapi32.lib uuid.lib wsock32.lib mpr.lib winmm.lib version.lib odbc32.lib odbccp32.lib msvcrt.lib libc=msvcrt.lib, so=dll, useshrplib=yes, libperl=perl56.lib Dynamic Linking: dlsrc=dl_win32.xs, dlext=dll, d_dlsymun=undef, ccdlflags=' ' cccdlflags=' ', lddlflags='-dll -nologo -nodefaultlib -debug -opt:ref,icf -libpath:"c:\perl561\lib\CORE" -machine:x86' Characteristics of this binary (from libperl): Compile-time options: MULTIPLICITY USE_ITHREADS PERL_IMPLICIT_CONTEXT PERL_IMPLICIT_SYS Locally applied patches: ActivePerl Build 638 Built under MSWin32 Compiled at Apr 13 2004 19:24:21 %ENV: PERLDB_OPTS=""Nonstop frame=2"" @INC: C:/perl561/lib C:/perl561/site/lib . C:\perl561\bin>type p:387607.pl use strict; use warnings; use POSIX qw(:sys_wait_h); my $segfault=257; # set this to 188 to make perl segfault under 5.6.1 print $$,$/; $|++; my @pid; foreach my $i (0..3) { my $cmd='perl -le "print qq(hello world!); sleep ' .(10+$i*2) .(';' x $segfault ) .'; print qq(foo); " >NUL 2>&1'; print length($cmd),$/; $pid[$i]=system(1,$cmd); } my @wait=(0) x 4; my $c=0; while (grep !$_,@wait) { print(qq(running... @{[$c++]} [@wait]\r)); foreach my $i (0..3) { $wait[$i]||=waitpid($pid[$i], &WNOHANG); } sleep(1); } print(qq(Finished: @{[$c++]} [@wait]\r)); C:\perl561\bin>perl5.6.1 p:387607.pl 1328 327 327 327 327 Finished: 18 [1364 928 1020 736]