Op een mooie dag (Sun, 16 Dec 2001 00:47:17 -0500), schreef Michael G Schwern <[EMAIL PROTECTED]>:
> The second [1] Test::Harness 2.00 release candidate just went up to CPAN > http://www.pobox.com/~schwern/src/Test-Harness-2.00_04.tar.gz .... > Simply install the module, let me know if it went ok and your perl -V > and go about your normal business. Failed Test Stat Wstat Total Fail Failed List of Failed ------------------------------------------------------------------------------- t\strap-analyze.t 18 4608 19 18 94.74% 2-19 t\strap.t 12 3072 146 12 8.22% 51 57 63 75 80 87 98 100 105 111 116 123 Failed 2/7 test scripts, 71.43% okay. 30/225 subtests failed, 86.67% okay. Sorry, I did look into the failed tests, but I don't understand the Test::Harness::Straps::analyze_file() logic. MSWin32 doesn't support the open() constructs with '-|' and '|-'. The strap.t failures are mostley "got: undef expected: ''"; This has to do with either the test-data or the Test::Harness::Straps::_is_test() interface. This was tested with ActivePerl 5.6.1 (build 628) and bleadperl (W2k, MSVC60): Summary of my perl5 (revision 5 undef) 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=define d_sfio=undef uselargefiles=undef usesocks=undef use64bitint=undef use64bitall=undef uselongdouble=undef usemymalloc=n, bincompat5005=undef Compiler: cc='cl', ccflags ='-nologo -Gf -W3 -O1 -MD -DNDEBUG -DWIN32 -D_CONSOLE -DNO_STRICT -DHAVE_DES_FC RYPT -DPERL_IMPLICIT_CONTEXT -DPERL_IMPLICIT_SYS -DUSE_PERLIO -DPERL_MSVCRT_READFIX', optimize='-O1 -MD -DNDEBUG', cppflags='-DWIN32' ccversion='undef', gccversion='', gccosandvers='undef' 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, prototype=define Linker and Libraries: ld='link', ldflags ='-nologo -nodefaultlib -release -libpath:"c:\opt\perl572\lib\CORE" -machin e:x86' libpth=\lib libs= oldnames.lib kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib sh ell32.lib ole32.lib oleaut32.lib netapi32.lib uuid.lib wsock32.lib mpr.lib winmm.lib version.lib o dbc32.lib odbccp32.lib msvcrt.lib perllibs=undef libc=msvcrt.lib, so=dll, useshrplib=yes, libperl=perl57.lib Dynamic Linking: dlsrc=dl_win32.xs, dlext=dll, d_dlsymun=undef, ccdlflags=' ' cccdlflags=' ', lddlflags='-dll -nologo -nodefaultlib -release -libpath:"c:\opt\perl572\lib\COR E" -machine:x86' Characteristics of this binary (from libperl): Compile-time options: MULTIPLICITY USE_ITHREADS PERL_IMPLICIT_CONTEXT PERL_IMPLICIT_SYS Locally applied patches: DEVEL13599 Built under MSWin32 Compiled at Dec 11 2001 00:50:41 %ENV: PERLDOC_PAGER="less" @INC: c:/opt/perl572/lib c:/opt/perl572/site/lib . -- Good luck, Abe Amsterdam Perl Mongers http://amsterdam.pm.org perl -Mstrict -wle 'sub Just{&$_}sub another{&$_}sub Perl{&$_}sub hacker{&$_}$_=sub{(split /::/,(caller $^W)[3])[-$^W].$"};print Just, another, Perl, hacker;'