•Re: Re: Re: Serializing coderefs

[merlyn]

That of course "does the job" for a limited subset of coderefs, since at the moment there's no way to know the closure bindings (or get at them for their current values), so it'll come back to life pointing at an entirely wrong set of closure-bound variables.

This is a known issue, and being considered during the development of the Perl6 runtime engine.

-- Randal L. Schwartz, Perl hacker

[jmerelo]

Is there a better way? Any reference to the cases where it will fail?

[merlyn]

It will fail on this:

my $increment_by_secret = do {
  my $secret_number = 7;
  sub { $secret_number + shift };
};

It fails because there's no access to $secret_number from outside the coderef, so we can't tell what the "magic constant" should be. All you get is:

{
    ($secret_number + shift(@_));
}

(Just tested.)

-- Randal L. Schwartz, Perl hacker