#!/usr/bin/perl

package AppConfig;

use 5.014;
use strict;
use warnings;
use autodie;

use Exporter qw(import);

# Module specific imports
use XML::Twig;

our $VERSION     = 1.00;
our @ISA         = qw(Exporter);
our @EXPORT_OK   = qw(getAppConfig);
our %EXPORT_TAGS = (
		   	'all' => \@EXPORT_OK,
		   ); 

our $configFile;

sub getAppConfig {

my (%config,$twig,$root);
say $AppConfig::configFile;
$twig = XML::Twig->new();
$twig->parsefile->($AppConfig::configFile);
$root = $twig->root;

$config{'ppSK'}=$root->first_child('pp')->first_child('ppSK')->text;

return \%config;

}

# End.....
1;