如何禁用冗余Perl证明输出？

Question

prove gives me output like this:

$ prove t/HealthScores.t 
t/HealthScores.t .. ok   
All tests successful.
Files=1, Tests=2,  0 wallclock secs ( 0.04 usr  0.00 sys +  0.16 cusr  0.01 csys =  0.21 CPU)
Result: PASS

For me the last two lines are redundant and unnecessary. I'd like to disable their display but can't find a CLI switch for this. Eg, I'd like to only see this:

$ prove t/HealthScores.t
t/HealthScores.t .. ok
All tests successful.

Any ideas?

Answer 1

No. These are not output conditionally.

if ( $aggregate->all_passed ) {
    $self->_output_success("All tests successful.\n");
}

...

my $files = @$tests;
$self->_output("Files=$files, Tests=$total, $runtime\n");
my $status = $aggregate->get_status;
$self->_output("Result: $status\n");

Though there does appear to be a way to silence these and other messages since the above is preceded by

return if $self->silent;