http://qs321.pair.com?node_id=1048863


in reply to Accessing DEBUG constant from sub-package

Define the debug code in your modules in terms of ::DEBUG. Ie:

package Some::Thing; ... if( ::DEBUG ) { ## do debug stuff }

And in main:

use constant DEBUG => 1; ## set to 0 to disable debug and have debug g +uarded code optimised away use Some::Thing; ...

With the rise and rise of 'Social' network sites: 'Computers are making people easier to use everyday'
Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.
"Science is about questioning the status quo. Questioning authority".
In the absence of evidence, opinion is indistinguishable from prejudice.