...Devel::EvalError...

my @ret = eval q{do {
  package Swandog::Randomness::THE42ITSAGUIWITHOUTDASHESHERENOW;
    $slurpeded
}};
...
[download]

See also Safe, Safe::World, Symbol, namespace::autoclean, CGI::Compile .... and things (pm posts and modules) which mention these things