6 use Test::Builder::Tester;
30 test_out('ok 1 - does_ok class');
32 does_ok('Bar','Foo','does_ok class');
36 test_out ('not ok 2 - does_ok class fail');
39 does_ok('Baz','Foo','does_ok class fail');
45 test_out ('ok 3 - does_ok object');
47 does_ok ($bar,'Foo','does_ok object');
53 test_out ('not ok 4 - does_ok object fail');
56 does_ok ($baz,'Foo','does_ok object fail');
58 test_test ('does_ok');