package G;
  use strict;
  use Config::General;
  use vars qw( %CF );
  %G::CF = ParseConfig("./config.dat");