##########################################################
# subroutine getSecondArraySize
# Parameter: An associative array containing scalar 
#            array and the name of a key
# Returns the total amount of element(s) in the scalar
# array within the associative array at the key location
# index
##########################################################
sub getSecondArraySize {

	# receives the argument
	my ($index, %array_to_count) = @_;
	
	# create the variable and get the number
	my $count=0;
	
	# determine the total amount of elements in the array	
    while (defined($array_to_count{$index}[$count])) {
       $count++;
    }   
    return $count;	
}