sub _is_inactive { my( $self ) = @ARG; my( $realword ) = $self->realword; return $realword =~ $self->CHEVRON_QR; } install_sub( { code => __PACKAGE__->hash_instance_cache( 'sub' => '_is_inactive' ), as => 'is_inactive' } );