6 use Test::Builder::Tester;
10 use_ok('Test::Moose');
25 test_out("ok 1", "not ok 2");
27 my $ret = with_immutable {
28 ok(Foo->meta->is_mutable);
30 test_test('with_immutable failure');
31 ok(!$ret, "one of our tests failed");
33 test_out("ok 1", "ok 2");
34 $ret = with_immutable {
35 ok(Bar->meta->find_method_by_name('new'));
37 test_test('with_immutable success');
38 ok($ret, "all tests succeeded");