my $i = 0; my @names = map { $i++ > 6 ? ($_) : () } @input2arr;