Re^2: Dynamically Changing Packages w/out Eval

A lot simpler and a lot less fragile:

my @overload = ('+' => sub {
    my $self = shift;
    my ($other, $info) = @_;
    # do some stuff
});

eval "package $namespace; use overload \@overload; 1"
    or die $@;
[download]

Comment on Re^2: Dynamically Changing Packages w/out Eval Download Code

Replies are listed 'Best First'.
Re^3: Dynamically Changing Packages w/out Eval by betterworld (Curate) on Aug 24, 2009 at 14:13 UTC
I thought the original question was how to avoid eval :)	[reply]
Re^4: Dynamically Changing Packages w/out Eval by ikegami (Patriarch) on Aug 24, 2009 at 14:43 UTC
True, but he wanted to avoid `eval` "because it obfuscates the code". It's clearly the opposite here.	[reply] [d/l]
Re^5: Dynamically Changing Packages w/out Eval by betterworld (Curate) on Aug 24, 2009 at 19:54 UTC
I avoid eval out of habit. Even if you make sure that you don't eval user input and keep the evaluated code minimal, it's still annoying to debug warnings like "Argument isn't numeric at eval 2718, line 314". Though you're right that my code looks a bit obfuscated.	[reply]
Re^6: Dynamically Changing Packages w/out Eval by ikegami (Patriarch) on Aug 24, 2009 at 21:35 UTC
Re^4: Dynamically Changing Packages w/out Eval by Anonymous Monk on Aug 24, 2009 at 14:15 UTC
You can't expect someone to read the OP	[reply]


Perl: the Markov chain saw
	PerlMonks