1use strict; 2use warnings; 3use Test::More tests => 4; 4BEGIN { use_ok 'director_frob' } 5require_ok 'director_frob'; 6 7my $foo = director_frob::Bravo->new(); 8isa_ok $foo, 'director_frob::Bravo'; 9 10is($foo->abs_method(), 'Bravo::abs_method()'); 11