}

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;