package Foo;

use constant LOG_DEBUG => 0;

package main;

my $log_level = 'LOG_DEBUG';

print Foo->$log_level, "\n";