for my $number (1 .. 80) { $selTtl[$number] = $value; }