use constant CFGDIR=>'/config/' in my main script

##</code><code>##

Then tried to refer to it from module1.pm, 
$c = main::CFGDIR

##</code><code>##

my constant CFGDIR=>'/config/'
our constant CFGDIR=>'/config/'