$contentTemp =~ y/[A-Za-z0-9_\n]//cd;

##</code><code>##

$contentTemp =~ y/A-Za-z0-9_\n//cd;