eval "sub ${caller_package}::DEBUG () { $debug_value }";