Since this is a utility script for use by people who know Perl I'm not too worried about deliberately dangerous input, just the off chance that someone will test an Acme module and accidentally toast the script.

To summarize, after kicking it around the CB with fever and jarich it was revealed that Safe doesn't seem to allow use or require in its compartments, so it won't help in this case, since use is required (pun not intended but what the heck). Other ideas were to lock $0 somehow (Zaxo) or back it up in case of emergency, but I finally settled for not putting the example code from modules known to modify $0 into a form.

Update: changed to perigeeV's brilliant strategy of redefining $0 in a begin block.

ps - Mr. Muskrat, I know exactly what bleach does and that is what I'm trying to prevent ;^)

--
Check out my Perlmonks Related Scripts like framechat, reputer, and xNN.