Beefy Boxes and Bandwidth Generously Provided by pair Networks
No such thing as a small change

Re^2: Last index use in array slice

by bart (Canon)
on Dec 03, 2012 at 13:15 UTC ( #1006873=note: print w/ replies, xml ) Need Help??

in reply to Re: Last index use in array slice
in thread Last index use in array slice

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

my(undef, undef, @rest) = split/\n/;
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;

    When's the last time you used duct tape on a duct? --Larry Wall

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1006873]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others browsing the Monastery: (7)
As of 2015-07-31 03:35 GMT
Find Nodes?
    Voting Booth?

    The top three priorities of my open tasks are (in descending order of likelihood to be worked on) ...

    Results (274 votes), past polls