sub as_HTML {
# Bla bla bla
# Your typical subroutine initial stuff we don't care much about...
if ( ... ) {
# Some condition I don't really understand since I didn't bother to
# understand the initial stuff above. But it didn't seem to relevant.
# A whole lot of stuff happens here, seemingly all dealing with tags,
# not with text.
else { # it's a text segment
# Hey! Cool.
# One more line of bla bla bla, before...:
HTML::Entities::encode_entities( $node, $entities )
# Yeah, this sounds about right. Let's look at that.
# More stuff I didn't bother to look at...
}