for my $para ((@array[4 .. $#array])) {
	# process $para
}