ok 1 - use Foo::People;
ok 2 - Foo::People->can('new')
ok 3 - The object isa Foo::People
ok 4 - Foo::People->can('open')
ok 5 - ... and opening with an existing id should succeed
ok 6 - Foo::People->can('get_company_id')
ok 7 - ... and it should return the correct company id
ok 8 - Calling a constructor with an ID should succeed
ok 9 - The object isa Foo::People
ok 10 - Foo::People->can('get_company_id')
ok 11 - ... and it should return the correct company id
ok 12 - Foo::People->can('get_list')
ok 13 - ... and it should return an arrayref of people
ok 14 - ... as objects:  isa Foo::People
ok 15 - Foo::People->can('get_company_id')