Using two-dimensional array
@array = ( [1, 2], [3, 4], ); print $array[1][1]; print $array[0][1]; print $array[1][0];