in reply to "my" variables masking earlier declaration

my creates a new variable. That's really not what you want. Presumably, $VERBOSE and $DEBUG are package variables that can be declared using use vars qw( $VERBOSE $DEBUG );