Array Perl

  1. Home
  2. Perl
  3. Array
  4. 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];