get a test plan first

t/01compile.t

@@ -11,12 +11,16 @@ plan(skip_all => 'Test::Compile required')
     unless Test::Compile->require();
 
 my $test = Test::Compile->new();
+
+my @pm_files = $test->all_pm_files('lib');
+my @pl_files = qw(bin/app bin/update-metadata bin/access-check-manager.pl);
+
+plan tests => scalar @pm_files + scalar @pl_files;
 ok(
     $test->pl_file_compiles($_),
     $_
-) foreach qw(bin/app bin/update-metadata bin/access-check-manager.pl);
+) foreach @pl_files;
 ok(
     $test->pm_file_compiles($_),
     $_
-) foreach $test->all_pm_files('lib');
-$test->done_testing();
+) foreach @pm_files;