Re^2: Last index use in array slice

Alternatively, yet still using the idea of discarding part of the output:

my(undef, undef, @rest) = split/\n/;
[download]

But, with a variable value for $index, I'd rather go the splice route.

Comment on Re^2: Last index use in array slice Download Code

Replies are listed 'Best First'.
Re^3: Last index use in array slice by ColonelPanic (Friar) on Dec 03, 2012 at 13:29 UTC
Yeah, I thought of that one, but ultimately didn't use it because, as you mentioned, it doesn't work well with an arbitrary starting index. You could do something like this: `my $str = "discard\ndiscard\nkeep1\nkeep2"; my $index = 2; my @arr = grep {$index-- <= 0} split "\n", $str;` [download] When's the last time you used duct tape on a duct? --Larry Wall	[reply] [d/l]


Clear questions and runnable code get the best and fastest answer
	PerlMonks