Beefy Boxes and Bandwidth Generously Provided by pair Networks
Problems? Is your data what you think it is?
 
PerlMonks  

(Maclir)Re: (dws)Re: Perverse Unreadable Code

by Maclir (Curate)
on Apr 26, 2001 at 10:51 UTC ( #75725=note: print w/ replies, xml ) Need Help??


in reply to (dws)Re: Perverse Unreadable Code
in thread Perverse Unreadable Code

There are advantages in the:

if ( $debug ) { print "About to fetch $url\n"; }
approach, mainly because if I want to throw a few more statements into the "if" block, I can do it simply.

I also find having the code structured that way indicates clearly that a conditional is involved, and by seeing what the condition is, it can often provide an indication of why something is being done. For example:

if ( $account_balance < '100.00' ) { print "Don't pay the loser any interest.\n"; }
indicates we are dealing with low value accounts.

But then again, we are talking subjective matters here. An alternative way, and in my mind just as readible, is:

&calculte_interest($account_number) unless ($account_balance < '100. +00' );

As a side line, I recall being told once "Fortran programmers can write fortran programs in any language."


Comment on (Maclir)Re: (dws)Re: Perverse Unreadable Code
Select or Download Code

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others musing on the Monastery: (18)
As of 2015-07-31 16:21 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The top three priorities of my open tasks are (in descending order of likelihood to be worked on) ...









    Results (279 votes), past polls