use Test::More;
use_ok('Some_Module');
$obj=Some_Module->new();
isa_ok($obj,'Some_Module');
my @tests=(
           'is($obj->accessor,"Some value","accessor")',
          );
plan tests => 2+@tests;
eval $_ for @tests;