#!/usr/bin/perl -w
use strict;
use Config::General;

my $conf = new Config::General('conf/default.conf');
my %config = $conf->getall;

print "$config{'categories'}{1}\n";