#!/usr/bin/perl
use strict;
use AppConfig qw(:expand :argcount);
#Create $config object
my $config = AppConfig->new({
	GLOBAL =>
	{
		ARGCOUNT => ARGCOUNT_ONE,
		DEFAULT => "",
	},
	CREATE => 1,
});
#open config file
unless ($config->file("config.conf"))
{
	die "Could not open or find configuration file.\n";
}
my $user_name = $config->get("global_username");
my $password = $config->get("global_password");

##</code><code>##

[GLOBAL]
#Set you username
username = default
#Do not uncomment unless you need to
#password = default