> my %uniao = (%hash1, %hash2); > > my %diferenca = %hash2; > my %interseccao = delete @diferenca{ @list1 }; > # %diferenca agora contem os valores de 2 que não estão em 1 Uia... essa foi ninja! :-)