sub d0 {
 if($ENV{MYMOD_DEBUG_LEVEL} >= $my_level) {
   doThis;
 } else {
   doThat;
 }
}