Hey Jeffa,
FYI, the constantness of the variables, once set, seems to mean that I don't have to use a '$' to reference a token. Instead, I should reference a constant token all by itself e.g. DEBUG vs $DEBUG

use constant DEBUG => 0;

if ( DEBUG ) { ... }    # RIGHT
if ( $DEBUG ) { ... }   # Wrong
[download]

Once, I figured this out using perldoc constant all worked very nicely. Thanks again for your input.

----------
- Jim