$words =~ s/<.*>//g;

##</code><code>##

    <span class="author-name" itemprop="author">Romaxton</span>

##</code><code>##

    $words =~ s/<[^>]+>//g;

##</code><code>##

    $words =~ s/<.*?>//g;