I think this is what kyle is asking for:

t$ prove -v t00_[pu]*
t00_pod::TestGroupA....1..3
ok 1 - Base is covered
ok 2 - Deploy is covered
ok 3 - Update is covered
ok
t00_pod::TestGroupB....1..2
ok 1 - Module loaded successfully
ok 2 - new() -- returns proper object
ok
t00_upd....1..2
ok 1 - Module loaded successfully
ok 2 - new() -- returns proper object
ok
All tests successful.
Files=2, Tests=7,  0 wallclock secs ( 0.26 cusr +  0.02 csys =  0.27 C
+PU
[download]

Not sure how to get it though.