#!/usr/bin/perl -w
use strict;

use constant LOG_DIRECTORY => '/foo/bar/baz';

my %hash;
$hash{LOG_DIRECTORY} = 'happy';

print "log directory ${\LOG_DIRECTORY} is $hash{LOG_DIRECTORY}\n";

__END__
produces:

log directory /foo/bar/baz is happy