use vars qw($Var %Config); our @ListItems