my $lastIndex = (scalar @ABC) - 1; my $totalKeys = scalar keys %{$ABC[$lastIndex]};