^M x perl-mode

##</code><code>##

^M x font-lock-fontify-buffer