build array name based on loop index

Shell Programming and Scripting
1

Hi,
I am new to perl and I have the following query please help here.

I have following array variables declaration

@pld1 = qw(00 01 02 03 04 05);
@pld2 = qw(10 11 12 13 14 15);
 
for(my $k=1;$k<=2;$k++)
{
   //I want here to use @pld1 if $k is 1
   // and @pld2 if $k is 2. How to do that ????
   //I have user defined function 'send' below
 
   send(@pld$k);
    
}

but the above function giving syntax error. how to substitute $k so that I send @pld1 when $k is 1 and @pld2 when $k is 2.

Thanks

2

use:

eval  "&sendK(\@pld$k)" ;
3

You could also use a single, two-dimensional, array, or array references, since perl supports complex data structures.

4

Hi Klashxx,
That worked. Thanks a lot.

Thanks
Jana