# --------------------------------------------------------------------------

# --------------------------------------------------------------------------

# Read in the system's configuration

# Read in the system's configuration

use cfgcache;

use cfgcache;

my $dd = $cfg{'dd'};

my $dd = $cfg{'dd'};

use Cwd;

use Cwd;

use IO::File;

use IO::File;

use lib 'lib';

use lib 'lib';

use L2hos;

use L2hos;

#use diagnostics;

#use diagnostics;

# Initialize

# Initialize

# --------------------------------------------------------------------------

# --------------------------------------------------------------------------

use cfgcache;

use cfgcache;

use L2hos;

use L2hos;