On the one hand the code as posted at the top of this thread is not being fair to the poor shmuck who created the mess -- OTOH, the poor shmuck has it coming to him.
The biggest problem: at the originating blog page, Poor Shmuck didn't do enough (if anything) to escape the html-sensitive characters in his perl code (like angle brackets and ampersands). That's why the code doesn't compile as posted here (or as it appears at the originating blog page).
I can understand not taking the trouble to invent something as clever as our beloved <code> tags, but PS didn't even use <pre>... Could he really be fishing for a bad rep? I just don't get it.