in reply to Re: Rethinking Your Program's If-Thens
in thread Rethinking Your Program's If-Thens

Maintainability flaw: using an anonymous array rather than an anonymous hash or named constants. Can you tell me what 3 and 4 mean in your code?

Also a gotcha, this function will work in a module and may not when buried in the body of your program because %map isn't yet populated. Solutions: put a BEGIN in front of the start of your block, be aware of the limitation, or put a check in division_service that populates %map if it isn't populated yet.

And style points. I don't like &{...}() as much as (...)->(). Also I don't know what I think of your cute trick with putting the error check inside the dereference rather than doing a traditional exists test.

  • Comment on Re: Re: Rethinking Your Program's If-Thens

Replies are listed 'Best First'.
Re^3: Rethinking Your Program's If-Thens
by Aristotle (Chancellor) on Oct 12, 2002 at 18:15 UTC

    As far as the array is concerned, since I don't know the meaning of its fields I had to work with what princepawn gave us.

    Thanks for pointing out the module vs main program issue which I omitted even though I was aware of it. I'd prefer the BEGIN in that case: no checks at runtime (CPU efficiency), no extra code to read and write (programmer efficiency).

    You are right about &{$ref}() and I usually prefer $ref->() as well. In this case it was a conscious choice because I felt it read better this way considering I embedded the croak in the lookup.

    I generally dislike exists tests because they usually force me to spell out the same hash lookup twice. At least in this case we can get away with a simple or-test, because a hash value will either not exist or be a coderef, which by definition is true. Now the choice is to either embed the error check in the call like I did (ugly), or use a temporary variable like so - also ugly:

    my $lookup_div_serv = $map{$dcr_type} or croak "...";
return $lookup_div_serv->();

    [download]
    I'd be happy with this if I needed the $lookup_div_serv in muliple places, but I don't. This is basically a case of deciding which ugliness to consider the lesser of evils.

    Makeshifts last the longest.

[reply]
[d/l]
      One point. The BEGIN solution isn't best if your block refers to other functions that might be defined later in your code. Being lazy avoids this issue and generally will Do The Right Thing with less attention on your part. Admittedly with a small run-time penalty.
[reply]

In Section Meditations