eval { ($fh1, $name3) = Archive::Zip::tempFile("ziptest"); };
ok($@, "Test that tempfile() failed");
is($fh1, undef, "Test correct returns from failed tempFile call" );
is($name3, undef, "Test correct returns from failed tempFile call");
ok(chmod(0700, 'ziptest'), "chmod ziptemp directory to cleanup");
is(rmdir('ziptest'), 1, "Remove ziptemp") || diag $!;
ok(! -d 'ziptest', "Was ziptest deleted?");

##</code><code>##

Running make test
PERL_DL_NONLAZY=1 /usr/bin/perl "-MExtUtils::Command::MM" "-e" "test_harness(0, 'blib/lib', 'blib/arch')" t/*.t
t/00.load...........ok 2/2# Testing Archive::Zip 1.15, Perl 5.008006, /usr/bin/perl
t/00.load...........ok
t/pod...............ok
t/test..............ok
t/testex............ok
t/testMemberRead....ok
t/testTree..........ok
t/testUpdate........ok
t/za_archive_zip....NOK 15#     Failed test (t/za_archive_zip.t at line 42)
t/za_archive_zip....NOK 16#     Failed test (t/za_archive_zip.t at line 43)
#          got: 'IO::File=GLOB(0x923712c)'
#     expected: undef
t/za_archive_zip....NOK 17#     Failed test (t/za_archive_zip.t at line 44)
#          got: 'ziptest/KMLGObEMyp.zip'
#     expected: undef
t/za_archive_zip....NOK 19#     Failed test (t/za_archive_zip.t at line 46)
#          got: '0'
#     expected: '1'
# Directory not empty
t/za_archive_zip....NOK 20#     Failed test (t/za_archive_zip.t at line 47)
t/za_archive_zip....ok 22/0# Looks like you failed 5 tests of 22.
t/za_archive_zip....dubious
        Test returned status 5 (wstat 1280, 0x500)
DIED. FAILED tests 15-17, 19-20
        Failed 5/22 tests, 77.27% okay
Failed Test        Stat Wstat Total Fail  Failed  List of Failed
-------------------------------------------------------------------------------
t/za_archive_zip.t    5  1280    22    5  22.73%  15-17 19-20
Failed 1/8 test scripts, 87.50% okay. 5/195 subtests failed, 97.44% okay.
make: *** [test_dynamic] Error 2
  /usr/bin/make test -- NOT OK

cpan>