$row = 1; foreach (@INFO_ARRAY) { print "Row $row has " . @{$INFO_ARRAY[$_]} . "columns.\n"; $row++; }