my $cfg = App::Config->new({ 'CASE' => 0 }); $cfg->define("effective_group", { 'DEFAULT' => "nogroup" }); $cfg->define("effective_user", { 'DEFAULT' => "nobody" }); $cfg->define("http_port", { 'DEFAULT' => "localhost:8080", 'CMDARG' => [ "-p" ], 'ARGCOUNT' => 1 });