my $totalKeys = scalar keys %{$ABC[-1]}; 
my $totalKeys = keys %{$ABC[-1]}; 
my $totalKeys = 0 + keys %{$ABC[-1]};