That's why modules such as Test::More allow you to name your tests - it makes finding the offending test much easier. Of course this won't help you with old-style, handmade or bad test suites, but test names are just as variable names - it's up to the author to chose sensible names.

perl -MHTTP::Daemon -MHTTP::Response -MLWP::Simple -e ' ;    # The  
$d = new HTTP::Daemon and fork and getprint $d->url and exit;#spider
($c = $d->accept())->get_request(); $c->send_response( new   #in the
HTTP::Response(200,$_,$_,qq(Just another Perl hacker\n))); ' #  web
[download]

Also, it looks like line numbers are given with (newer versions of?)Test.pm

t/file..............ok 15/38# Failed test 16 in t/file.t at line 135  
+       
t/file..............ok 19/38# Failed test 20 in t/file.t at line 139  
+       
t/file..............ok 21/38# Failed test 22 in t/file.t at line 141  
+       
t/file..............NOK 22could not append: Permission denied at t/fil
+e.t line 146.
[download]

Carter's compass: I know I'm on the right track when by deleting something, I'm adding functionality

is( $stooges, 3 );
[download]

is( $stooges, 3, "Correct stooge count (in case we get Shemp too)" );
[download]