print $#array, 'x', max( map $#{ $_ // [] }, @array );;
- $#array is the largest index of @array;
- $#{ $_ } is the largest index of the array referenced by $_
- map assigns each of the values in @array to $_ in turn.
- Many of them will be undefined, if so, // [] substitutes an empty array for that value.
- Thus, the map extracts the highest indexes of all the subarrays in @array and substitutes 0 for those that are empty or don't exist.
- max() finds and returns the largest of those.
With the rise and rise of 'Social' network sites: 'Computers are making people easier to use everyday'
Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.
In the absence of evidence, opinion is indistinguishable from prejudice.