Select Code to Download

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

my $i = 1;
my @names = grep {++$i > 6} @input2arr;