#!/usr/bin/perl -wl - use strict; my @a; $a[0][0][0] = 0; $a[0][0][1] = 1; $a[1][0][0] = 2; $a[2][0][0] = 3; print $#a; print $a[0]; print $#{$a[0]}; print $a[0][0]; print $#{$a[0][0]}; print $a[0][0][0]; print $/; print $a[1]; print $#{$a[1]}; print $a[1][0]; print $#{$a[1][0]}; print $a[1][0][0]; __END__ 2 ARRAY(0x1abf1ac) 0 ARRAY(0x1abf1d0) 1 0 ARRAY(0x1ab51fc) 0 ARRAY(0x1ab522c) 0 2
In reply to Re: three dimensional arrays
by Anonymous Monk
in thread three dimensional arrays
by Fisch
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |