my $end = $#array; print "$array[3..$end]\n";