NOTE: use Perl; is on undef hiatus. You can read content, but you can't post it. More info will be forthcoming forthcomingly.
All the Perl that's Practical to Extract and Report
use Perl Log In
djberg96 (2603)
djberg96
(email not shown publicly)
(email not shown publicly)
Wednesday March 20, 2002
03:52 PM
Stumped with Safe
Given that I've slurped an OO package with a 'new' and 'init' method into a variable '$package', and the following code:
use Safe;
my $sandbox = Safe->new;
I can do this:
$sandbox->reval("$package->new");
$sandbox->reval("$package->new->init");
But I can't figure out how to do this:
my $obj = $sandbox->reval("$package->new");
$sandbox->reval("$obj->init"); # Crunch!
I tried reblessing '$obj' into '$package', but that didn't work. Is what I'm trying to do even possible?
Oh, well. It's enough to start with.
--Larry Wall in stab.c from the perl source code
Stories, comments, journals, and other submissions on use Perl; are Copyright 1998-2006, their respective owners.
Stumped with Safe 0 Comments More | Login | Reply /