my $result;
lives_ok {$result = $o->answer} 'answer worked';
is $result, 42, 'answer returned 42';