gistfile1.pl

$ cat /tmp/foo.t 
use Test::More;

plan tests => 1;

my $f = 1;

note(sprintf("Testing: %s", $f++));
diag(sprintf("Testing: %s", $f++));

ok 1;
$ prove /tmp/foo.t 
# Testing: 2
/tmp/foo.t .. ok   
All tests successful.
Files=1, Tests=1,  0 wallclock secs ( 0.02 usr  0.01 sys +  0.01 cusr  0.00 csys =  0.04 CPU)
Result: PASS
$ prove -v /tmp/foo.t 
# Testing: 2

ok 1
ok
All tests successful.
Files=1, Tests=1,  0 wallclock secs ( 0.02 usr  0.00 sys +  0.01 cusr  0.00 csys =  0.03 CPU)
Result: PASS

my results

✓ 08:29 ~/tmp/more $ prove t.t 
t.t .. # Testing: 2
t.t .. ok   
All tests successful.
Files=1, Tests=1,  0 wallclock secs ( 0.03 usr  0.03 sys +  0.02 cusr  0.01 csys =  0.09 CPU)
Result: PASS
✓ 08:29 ~/tmp/more $ prove -v t.t 
t.t .. 
1..1
# Testing: 1
# Testing: 2
ok 1
ok
All tests successful.
Files=1, Tests=1,  0 wallclock secs ( 0.03 usr  0.02 sys +  0.02 cusr  0.01 csys =  0.08 CPU)
Result: PASS
✓ 08:29 ~/tmp/more $