Mega Code Archive

 

Categories / Perl / Array

 

Assign returning array value from a function to an array

for $loopindex (0..4) {     $array[$loopindex] = [&zerolist]; } sub zerolist {     return (0, 0, 0, 0); } print $array[1][1];