tie my $obj, Tie::Constrained => sub {
    !$_[0] or $_[0]->isa('My::Frobnicator');
};