Help for this page

Select Code to Download

Select or download this

$text =~ s[\b([Cc]at)\b][<span class="topic">$1</a>]g;