my %temphash; @temphash{@array1, @array2} = (); my @mergedkeys = keys %temphash #### my %temphash; @temphash{@array1} = (); delete @temphash{@array1}; my @newarray = keys %temphash;