perl split the element of array into another 2D array error

Question

I have an array that contains strings looking like this s1,s2,.. I need to split on "," and have the strings in another 2D array that's my code

 @arr2D;
     $i=0;
     foreach $a (@array){
    $arr2D[$i]= split (/,/,$a);
    $i++;
     }
//print arr2D content 
    for ($j=0;$j<scalar @arr;$j++){
    print $arr2D[$j][0].$arr2D[$j][1]."\n";
    }

the problem is while trying to print arr2D content I got nothing... any suggestion ?

Joe Z · Accepted Answer · 2013-07-01 17:31:26Z

4

You need to capture the result of the split into an array itself. Notice the additional brackets below. This captures the result into an array and assigns the array reference to $arr2D[$i], thus giving you the 2-D array you desire.

foreach my $elem (@array)
{
    $arr2D[$i] = [ split( /,/, $elem ) ];
    $i++;
}

Also, you probably want to avoid using $a, since perl treats it specially in too many contexts. Notice I changed its name to $elem above.

Stylistically, you can eliminate the $i and the loop by rewriting this as a map:

@arr2D = map { [ split /,/ ] } @array;

That should work, and it's far more concise.

edited Jul 1, 2013 at 17:31

answered Jul 1, 2013 at 17:25

Joe Z

18k3 gold badges30 silver badges39 bronze badges

Sign up to request clarification or add additional context in comments.

2 Comments

Hunter McMillen Over a year ago

push @arr2D, [ split( /,/, $elem ) ]; would remove the need for $i

Joe Z Over a year ago

Hunter: Yes, if @arr2D were empty at the start. It wasn't clear to me if it was.

Collectives™ on Stack Overflow

perl split the element of array into another 2D array error

1 Answer 1

2 Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

2 Comments

Your Answer

Sign up or log in

Post as a guest

Related