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