Build 4-element array, each with references to another array : Array Reference « Array « Perl






Build 4-element array, each with references to another array

   

@words = (one, two, three, four, five, six, seven, eight, nine, ten, );
@codeNumbers = (1,2,3,4,5,6,7,8,9,10);
@codeLetters = (A,B,C,D,E,F,G,H,I,J);
@codes[0] = \@words;
@codes[1] = \@codeNumbers;
@codes[2] = \@codeLetters;
@codes[3] = \@myValue;

for ($index = $codes[3]->[1]->[0] ; $index <= $#{$codes[3]->[1]}; $index++){
    $codeIndex = $codes[1][$index];
    $codeWord = $codes[0][$codeIndex];
    $codeLetter = $codes[2]->[$codes[1][$index]];
    print "$codeWord\t : $codeLetter\n";
}

   
    
    
  








Related examples in the same category

1.Using array reference with two-dimensional array
2.dereferenced array
3.Modify individual elements, using the syntax ${$reference}[$element]:
4.Using @array as a condition
5.Using the backslash operator on arrays.
6.Output the value of an array reference
7.Using -> to reference value in an array reference variable
8.Using array reference variable to get the element value
9.Using array variable name as the reference to that array