El método isa

El método isa nos permite saber si una clase hereda de otra:

if ($a->isa("B")) { # El objeto a es de la clase B ... }

El método isa memoriza los valores que retorna, de manera que una vez que conoce un par no necesita realizar una segunda búsqueda. Sin embargo la modificación de los arrays @ISA en la jerarquía borra las caches:

  DB<1> @A::ISA = qw{B}; @B::ISA = qw(C); @C::ISA = ()
  DB<2> $x = bless {}, 'A'
  DB<3> x $x->isa('C')
0  1
  DB<4> @B::ISA = ()
  DB<5> x $x->isa('C')
0  ''