if ( $obj->isa( 'Foo' ) ) {...}