http://www.perlmonks.org?node_id=127011


in reply to How to use LWP::Simpe inside a safe compartment?

First of all let me say that I know nothing about how Safe.pm works. However, I was able to run your program without errors with the following change:
$codefromoutside='print wget "http://google.com";'; use LWP::Simple (); sub wget { LWP::Simple::get $_[0] } use Safe; $safe=new Safe; $safe->share(qw(LWP::Simple::get)); ## <- note change here $safe->reval($codefromoutside); print $@ if $@;
This may be inappropriate or not, I don't know, but maybe it helps.

--Jim