complete-run: fix uninitialized warning

This commit is contained in:
Michael Stapelberg 2011-12-17 11:20:16 +00:00
parent 81f4b6fc1a
commit 95508c3469
1 changed files with 2 additions and 1 deletions

View File

@ -172,7 +172,8 @@ my @slowest = map { $_->[0] }
grep { !/^GLOBAL$/ } keys %timings;
say '';
say 'The slowest tests are:';
printf("\t%s with %.2f seconds\n", $_, $timings{$_}) for @slowest[0..4];
printf("\t%s with %.2f seconds\n", $_, $timings{$_})
for @slowest[0..($#slowest > 4 ? 4 : $#slowest)];
END { cleanup() }