Do the above, but put a bunch of ^G's in.

You could take this evil one step further and incorporate an Audible Code Separator in perl scripts - A search-and-replace of semi-colons with CTRL-G's in a script file with the single BEGIN block outlined in the above node could make for all sorts of fun in code review.