This distribution has been tested as part of the cpan-testers
effort to test as many new uploads to CPAN as possible.  See
http://testers.cpan.org/

Please cc any replies to [email protected] to keep other
test volunteers informed and to prevent any duplicate effort.
        
--
Dear Darin McBride,
    
This is a computer-generated test report for Cache-Repository-0.04, created
automatically by CPAN::Reporter, version 0.35, and sent to the CPAN 
Testers mailing list.  If you have received this email directly, it is 
because the person testing your distribution chose to send a copy to your 
CPAN email address.

Thank you for uploading your work to CPAN.  However, it appears that
there were some problems testing your distribution.

Sections of this report:

    * Tester comments
    * Prerequisites
    * Environment and other context
    * Test output

------------------------------
TESTER COMMENTS
------------------------------

Additional comments from tester: 

[none provided]

------------------------------
PREREQUISITES
------------------------------

Prerequisite modules loaded:

requires:

    Module             Need  Have    
    ------------------ ----- --------
    Filesys::DiskUsage 0.04  0.04    
    Module::Build      0     0.280500
    perl               5.8.0 5.008008

------------------------------
ENVIRONMENT AND OTHER CONTEXT
------------------------------

Environment variables:

    COMSPEC = C:\WINDOWS\system32\cmd.exe
    INCLUDE = 
;C:\strawberry-perl\mingw\include;C:\strawberry-perl\perl\lib\CORE;C:\strawberry-perl\perl\lib\encode
    LIB = ;C:\strawberry-perl\mingw\lib;C:\strawberry-perl\perl\bin
    NUMBER_OF_PROCESSORS = 2
    PATH = 
c:\perl\bin\;C:\WINDOWS\system32;C:\WINDOWS;C:\WINDOWS\system32\wbem;;;C:\Program
 Files\Subversion\bin;C:\mysql\bin;C:\Program 
Files\QuickTime\QTSystem\;C:\strawberry-perl\perl\bin;C:\strawberry-perl\dmake\bin;C:\strawberry-perl\mingw\bin;C:\Program
 Files\IDM Computer Solutions\UltraEdit-32
    PERL5LIB = 
    PROCESSOR_IDENTIFIER = x86 Family 15 Model 2 Stepping 9, GenuineIntel

Perl special variables (and OS-specific diagnostics, for MSWin32):

    Perl: $^X = C:\strawberry-perl\perl\bin\perl.exe
    UID:  $<  = 0
    EUID: $>  = 0
    GID:  $(  = 0
    EGID: $)  = 0
    Win32::GetOSName = WinXP/.Net
    Win32::GetOSVersion = Service Pack 1, 5, 1, 2600, 2, 1, 0, 256, 1
    Win32::IsAdminUser = 1

Perl module toolchain versions installed:

    Module              Have    
    ------------------- --------
    CPAN                1.8802  
    Cwd                 3.24    
    ExtUtils::CBuilder  0.18    
    ExtUtils::Command   1.09_01 
    ExtUtils::Install   1.4     
    ExtUtils::MakeMaker 6.30_01 
    ExtUtils::Manifest  1.46_01 
    ExtUtils::ParseXS   2.15    
    File::Spec          3.24    
    Module::Build       0.280500
    Module::Signature   n/a     
    Test::Harness       2.640   
    Test::More          0.650   
    version             0.670100

------------------------------
TEST OUTPUT
------------------------------

Output from 'C:\strawberry-perl\perl\bin\perl.exe ./Build test':

t\01filesys....
#   Failed test at t\01filesys.t line 97.

#   Failed test at t\01filesys.t line 97.

#   Failed test 'The object isa HASH'
#   at t\01filesys.t line 106.
#     The object isn't defined

#   Failed test at t\01filesys.t line 107.

#   Failed test 'Check file contents...'
#   at t\01filesys.t line 112.
#          got: undef
#     expected: '#! perl
# 
# use Test::More qw(no_plan);
# 
# use FindBin;
# use File::Spec;
# 
# use_ok('Cache::Repository');
# use_ok('Cache::Repository::Filesys');
# 
# # check constructors.
# my %opts = (
#             path => File::Spec->catdir($FindBin::Bin,
#                                        File::Spec->updir(),
#                                        '_repository'),
#             #compress => undef,
#             );
# mkdir($opts{path});
# my $remove_me = File::Spec->catdir($opts{path}, 'blah');
# mkdir($remove_me);
# 
# # clear should remove the extra directory.
# isa_ok(Cache::Repository->new(style => 'Filesys', %opts, clear => 1), 
'Cache::Repository::Filesys');
# ok(! -e $remove_me);
# 
# my $obj = Cache::Repository::Filesys->new(%opts);
# isa_ok($obj, 'Cache::Repository::Filesys');
# 
# my $rc =
#     $obj->add_files(
#                     tag => 'test',
#                     files => $0,
#                     basedir => $FindBin::Bin . '/..',
#                    );
# ok($rc);
# 
# $rc =
#     $obj->add_files(
#                     tag => 'test',
#                     files => $0,
#                     filename_conversion => sub { s/\.t$/\.pl/ },
#                     basedir => $FindBin::Bin . '/..',
#                    );
# ok($rc);
# 
# 
# my $buffer = 'some
#     large
#     test
# ' x 100;
# {
#     open my $fh, '<', \$buffer;
# 
#     $rc =
#         $obj->add_filehandle(
#                              tag => 'string_test',
#                              filehandle => $fh,
#                              filename => 'large.txt',
#                             );
#     ok($rc);
# }
# 
# {
#     my $hash = $obj->retrieve_as_hash(tag => 'string_test');
#     ok(keys %$hash == 1);
#     ok($hash->{'large.txt'}{data} eq $buffer);
# }
# 
# $obj->set_meta(tag => 'test',
#                meta => {
#                    name => 'test tag',
#                    author => '[EMAIL PROTECTED]',
#                },
#               );
# my $info = $obj->get_meta(tag => 'test');
# is($info->{name}, 'test tag', 'retrieving meta info');
# 
# # mismatch on number of files to change names...
# eval {
#     $obj->add_files(
#                     tag => 'test2',
#                     files => $0,
#                     filename_conversion => [qw(a b)],
#                    );
#     fail();
# };
# ok($@);
# 
# # check that the file is in properly.
# my @files = $obj->list_files(tag => 'test');
# ok(@files == 2);
# {
#     my @fname = ($0, $0);
#     $fname[1] =~ s/\.t$/\.pl/;
#     @files = sort @files;
#     @fname = sort @fname;
#     ok($files[$_] eq $fname[$_]) for 0..$#files;
# }
# 
# my $hash = $obj->retrieve_as_hash(
#                                   tag => 'test',
#                                   files => [EMAIL PROTECTED],
#                                  );
# ok($hash);
# ok(keys %$hash == 2);
# isa_ok($hash->{$0}, 'HASH');
# ok($hash->{$0}{data});
# 
# # read self to compare.
# seek(DATA,0,0);
# my $data = join '', <DATA>;
# is($hash->{$0}{data}, $data, "Check file contents...");
# 
# my $size = $obj->get_size(tag => 'test');
# ok(($size >= 2 * (-s $0)) and ($size <= 2 * (1024 + -s $0))) or
#     diag("Size: $size, expected about " . (2*-s $0));
# 
# my @tags = $obj->list_tags();
# ok(@tags);
# ok(@tags == 2);
# is($tags[0], 'test');
# 
# 1;
# __DATA__
# This is here to allow seek(DATA,0,0) to work.
# '
# Looks like you failed 5 tests of 24.
dubious
        Test returned status 5 (wstat 1280, 0x500)
DIED. FAILED tests 14-15, 18-20
        Failed 5/24 tests, 79.17% okay
Failed Test   Stat Wstat Total Fail  List of Failed
-------------------------------------------------------------------------------
t\01filesys.t    5  1280    24    5  14-15 18-20
Failed 1/1 test scripts. 5/24 subtests failed.
Files=1, Tests=24,  0 wallclock secs ( 0.00 cusr +  0.00 csys =  0.00 CPU)
Failed 1/1 test programs. 5/24 subtests failed.


--

Summary of my perl5 (revision 5 version 8 subversion 8) configuration:
  Platform:
    osname=MSWin32, osvers=5.1, archname=MSWin32-x86-multi-thread
    uname=''
    config_args='undef'
    hint=recommended, useposix=true, d_sigaction=undef
    usethreads=define use5005threads=undef useithreads=define 
usemultiplicity=define
    useperlio=define d_sfio=undef uselargefiles=define usesocks=undef
    use64bitint=undef use64bitall=undef uselongdouble=undef
    usemymalloc=n, bincompat5005=undef
  Compiler:
    cc='gcc', ccflags =' -s -O2 -DWIN32 -DHAVE_DES_FCRYPT  
-DPERL_IMPLICIT_CONTEXT -DPERL_IMPLICIT_SYS -fno-strict-aliasing 
-DPERL_MSVCRT_READFIX',
    optimize='-s -O2',
    cppflags='-DWIN32'
    ccversion='', gccversion='3.4.5', gccosandvers=''
    intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=1234
    d_longlong=undef, longlongsize=8, d_longdbl=define, longdblsize=12
    ivtype='long', ivsize=4, nvtype='double', nvsize=8, Off_t='long long', 
lseeksize=8
    alignbytes=8, prototype=define
  Linker and Libraries:
    ld='g++', ldflags ='-s -L"c:\strawberry-perl\perl\lib\CORE" 
-L"c:\strawberry-perl\mingw\lib"'
    libpth=c:\strawberry-perl\mingw\lib
    libs= -lmsvcrt -lmoldname -lkernel32 -luser32 -lgdi32 -lwinspool -lcomdlg32 
-ladvapi32 -lshell32 -lole32 -loleaut32 -lnetapi32 -luuid -lws2_32 -lmpr 
-lwinmm -lversion -lodbc32 -lodbccp32
    perllibs= -lmsvcrt -lmoldname -lkernel32 -luser32 -lgdi32 -lwinspool 
-lcomdlg32 -ladvapi32 -lshell32 -lole32 -loleaut32 -lnetapi32 -luuid -lws2_32 
-lmpr -lwinmm -lversion -lodbc32 -lodbccp32
    libc=-lmsvcrt, so=dll, useshrplib=yes, libperl=libperl58.a
    gnulibc_version=''
  Dynamic Linking:
    dlsrc=dl_win32.xs, dlext=dll, d_dlsymun=undef, ccdlflags=' '
    cccdlflags=' ', lddlflags='-mdll -s -L"c:\strawberry-perl\perl\lib\CORE" 
-L"c:\strawberry-perl\mingw\lib"'

Reply via email to