4 use Test::More tests => 5;
19 ok(!Child->can('extends'), "extends keyword is unimported");
20 ok(!Class->can('extends'), "extends keyword is unimported");
26 sub extends { "good" }
31 ok(!Foo->can('has'), "has keyword is unimported");
33 ok(Foo->can('extends'), "extends method is NOT unimported");
34 is(eval { Foo->extends }, "good", "extends method is ours, not the extends keyword");