Beefy Boxes and Bandwidth Generously Provided by pair Networks kudra
We don't bite newbies here... much
 
PerlMonks  

Re: Small examples of string eval

by DrHyde (Prior)
on May 15, 2006 at 09:22 UTC ( #549412=note: print w/ replies, xml ) Need Help??


in reply to Small examples of string eval

Here's an example I wrote. It's in use in production code. The method that contains this is a "helper" method which lives in its own package and is used in several classes. It mangles some paramaters and then:

  • changes package to whatever class it was invoked from;
  • calls a method in that class's superclass.
The reason I need to change package halfway through the method is, from perldoc perlobj:
It is important to note that "SUPER" refers to the super-class(es) of the current package
so instead of just doing this:
$class->SUPER::blah($hash_of_data);
I have to do this:
eval " package $class; \$class->SUPER::blah(\$hash_of_data); ";
Block eval won't cut it here, and while I'm sure plenty of people are going to bleat that this travesty just demonstrates that my design was wrong in the first place (and I'd agree) in the real world one doesn't always know what all the requirements are when one starts writing code. I decided it was better to write a couple of lines of ugly code - and comment what I was doing and why - than to spend literally days re-jigging everything else so that I could then write that tiny snippet of functionality more cleanly.


Comment on Re: Small examples of string eval
Select or Download Code

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://549412]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others perusing the Monastery: (16)
As of 2014-04-18 19:15 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    April first is:







    Results (471 votes), past polls