sub as_text {
    my ($self) = shift;
    my $processing_method = $self->tag;
    return $self->$processing_method( $self->data );
}