Add test different array with different values in array keys for Perl