more feedback from test to help identify test failures

t/13tarzip.t

@@ -14,14 +14,17 @@ require CPAN::Kwalify;
 require CPAN::HandleConfig;
 require CPAN::Tarzip;
 {
+    BEGIN{$count+=4}
     my $tgz = _f("t/CPAN/authors/id/A/AN/ANDK/CPAN-Test-Dummy-Perl5-Build-1.03.tar.gz");
     my $CT = CPAN::Tarzip->new($tgz);
+    ok($CT, "Tarzip object for tgz '$tgz' constructed");
     my $tmpdir = tempdir("t/13tarzipXXXX", CLEANUP => 1);
+    ok($tmpdir, "tmpdir '$tmpdir' created");
     my $cwd = Cwd::cwd;
+    ok($cwd, "cwd '$cwd' determined");
     chdir $tmpdir or die "Could not chdir to '$tmpdir': $!";
-    ok($CT->untar, "untar/ungzip should not throw an error");
+    ok($CT->untar, "untar/ungzip finished");
     chdir $cwd;
-    BEGIN{$count++;}
 }
 BEGIN{plan tests => $count}