my @PromoterLenghts = (4);
my $PromotroListLength = $#PromoterLenghts;