Select Code to Download

Select or download this

use Safe;
$s = new Safe;
$s->deny_only(q(:dangerous));
$s->reval(q(use Data::Dumper;));
die $@ if $@;

Select or download this

Possible unintended interpolation of @INC in string at /usr/lib/perl/5
+.10/DynaLoader.pm line 92.
Can't load module Data::Dumper, dynamic loading not available in this 
+perl.
...
 at (eval 2) line 1
Compilation failed in require at (eval 2) line 1.
BEGIN failed--compilation aborted at (eval 2) line 1.