my ($i,$j,$k,$l,$m,$n);
my ($Results,@Results,%Results);