Beefy Boxes and Bandwidth Generously Provided by pair Networks
P is for Practical
 
PerlMonks  

Re: •Re: when eval corrupts the invoker

by epoptai (Curate)
on Jun 25, 2002 at 03:48 UTC ( #177021=note: print w/ replies, xml ) Need Help??


in reply to •Re: when eval corrupts the invoker
in thread when eval corrupts the invoker

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.


Comment on Re: •Re: when eval corrupts the invoker

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://177021]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others musing on the Monastery: (6)
As of 2014-10-24 21:19 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    For retirement, I am banking on:










    Results (137 votes), past polls