Is there a way to tell Test::Harness to print a report relative to a certain directory, so the failing test isn't truncated if the full filename is long?

Here's my failure output:

Failed Test                       Stat Wstat Total Fail  Failed  List 
+of Failed
----------------------------------------------------------
/home/foo/sandbox/PerlCode/lib/T    5  1280    10    5  50.00%  1-2 4 
+7-8
/home/foo/sandbox/PerlCode/lib/T    2   512  2695    2   0.07%  2573 2
+636
/home/foo/sandbox/PerlCode/lib/T   28  7168   206   28  13.59%  123-13
+4 180
/home/foo/sandbox/PerlCode/lib/T    1   256    76    1   1.32%  47
4 tests skipped.
Failed xxx test scripts, 96.15% okay. xxx subtests failed, 99.29% okay
+.
[download]

Note the truncation -- the tests are not called "home/foo/sandbox/PerlCode/lib/T"... that's just how they start.

Thanks for advice

water

UPDATE

handled with an alias:

alias proveall='pushd . && cd ~/sandbox/PerlCode/lib && prove -r -s . 
+&& popd'
[download]

cool