John Hennessy wrote: > > Hi, I have two different hashes built from separate data and need to > find the common then differing items. > > $HoA1{$custnum} = [ $uid, $firstname, $lastname ]; > $HoA2{$uid} = [ $custnum, $firstname, $lastname ]; > > I have looked at examples for "Finding Common or Different Keys in Two > Hashes" but the keys must be the same. > To make the keys the same I would like to effect a reverse function but > only reversing the key and the first value leaving the remaining array > items in place.
Hi John. I would start by pulling out the lists of Customer Numbers and User IDs from the two hashes like this: my @custnum1 = keys %HoA1; my @uid1 = map { $Hoa1{$_}[0] } @custnum1; my @uid2 = keys %HoA1; my @custnum2 = map { $Hoa1{$_}[0] } @uid2; Then you only have the job of finding differences and commonalities between @custnum1/@custnum2 and @uid1/@uid2. HTH, Rob -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>