Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw

Re: Re: Conditional style (if, &&) query

by Hofmator (Curate)
on Oct 17, 2001 at 14:47 UTC ( #119355=note: print w/replies, xml ) Need Help??

in reply to Re: Conditional style (if, &&) query
in thread Conditional style (if, &&) query

Good point you make here but let me mention one thing in the context of debugging in this way. If you make $debug a constant then you don't get any runtime speed penalty for these kind of tests. They are optimised away at compile time:

use constant DEBUG => 1; DEBUG && print "printing debug info...\n"; print "printing other info ...\n";

Of course, you no longer have the option of specifiying your debug level on the command line. Sean M. Burke has a nice article about constants in perl (including this usage) here at The Perl Journal. We also had some discussion about that topic here at PM, e.g. in inlined DEBUG constant versus $DEBUG.

-- Hofmator

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://119355]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others contemplating the Monastery: (2)
As of 2018-01-22 06:39 GMT
Find Nodes?
    Voting Booth?
    How did you see in the new year?

    Results (232 votes). Check out past polls.