}

DEBUG_LEVEL

Just message and newline:

$MYMOD::DEBUG_LEVEL = 0;

Show calling sub (default):

$MYMOD::DEBUG_LEVEL = 1;

Show calling full name:

$MYMOD::DEBUG_LEVEL = 2;

Show tons of garble:

$MYMOD::DEBUG_LEVEL = 3;