Beefy Boxes and Bandwidth Generously Provided by pair Networks
XP is just a number
 
PerlMonks  

Re: A matter of style: how to perform a simple action based on a simple condition?

by Tux (Monsignor)
on Sep 26, 2010 at 10:32 UTC ( #862067=note: print w/ replies, xml ) Need Help??


in reply to A matter of style: how to perform a simple action based on a simple condition?

As the others already mentioned, it is about personal taste. But maybe more: it is how the people that maintain the code prefer to read it. If you are the only one, do what you prefer best. If it is a team, please follow the guidelines of the team and be consistent in that.

I never use the func () if $expr; syntax, because that is - for my mind - exactly the wrong way around.

I also never use && and || to do so, because it then doesn't differ enough with expressions:

$expr1 && $expr2 and action (); $expr1 || $expr2 or action ();

And if it gets more complicated, go to Three. Whenever in doubt, use parens:

if ($expr1 && $expr2 or $expr3 && ($expr4 || $expr5)) { action1 (); action2 (); }

So, I never ever use Two (and in our team when we see code like that it is immediately rewritten to One or Three).

Side note: I have one colleague that just cannot cope in his mind with unless. Not all people think alike, certainly when mixed languages (peoples languages, not computer languages) are involved.

Three has the ((very) big) advantage of being able to insert new code when the condition meets without changing the rest of the code.


Enjoy, Have FUN! H.Merijn


Comment on Re: A matter of style: how to perform a simple action based on a simple condition?
Select or Download Code

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others making s'mores by the fire in the courtyard of the Monastery: (4)
As of 2014-11-27 21:57 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    My preferred Perl binaries come from:














    Results (188 votes), past polls