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