die "not a foo" unless $obj->isa('foo'); #the error I want

##</code><code>##

$obj->do_something($useful);