in reply to How do I access only certain elements of a multidimensional array?

I incorrectly understood the question at first (thought, you wanted to access the 2nd column), now, I see, you want to access each row from the 2nd to the last element: 
my @new_shapes = ();
map { push(@new_shapes, [@$_[2..$#$_]]) } @shapes;

[download]
if you want to access, say from 1 to 4, just change: 
[2..$#$_]
to:
[1..4]

[download]

Replies are listed 'Best First'.
Re^2: How do I access only certain elements of a multidimensional array?
by 2teez (Vicar) on Nov 01, 2015 at 08:43 UTC

    Hi igoryonya,

    map { push(@new_shapes, [@$_[2..$#$_]]) } @shapes;

    I probably not use map like you are using.
    Maybe something like so: 

    my @new_shapes = map { [ @{$_}[ 2 .. $#$_ ] ] } @shapes;

print join( " " => @{$_} ), $/ for @new_shapes;

    [download]
    Output: 
    triangle polygon
blue yellow fuschia
c d e f g h i j k
Radio

    [download]

    If you tell me, I'll forget.
    If you show me, I'll remember.
    if you involve me, I'll understand.
    --- Author unknown to me
[reply]
[d/l]
[select]
      :), yea, it's better, condenses my 2 lines into 1.
[reply]

In Section Seekers of Perl Wisdom