El Método _accesible

34	  sub _accesible {
35	    my ($self, $attr, $access) = @_;
36	    return $_defaults{$attr}[1] =~ /$access/;
37	  }

El método _accesible nos dice si una clave esta accesible para el tipo de acceso requerido.