my $cfgfile = 'prodsafety.cfg';

my $conf = Config::General->new($cfgfile);
my %config = $conf->getall;

foreach my $k (keys %config){
        print "$k is $config{$k}."
}

##</code><code>##

7/16 is .