push ( @{$map{$$row[1]}{$$row[2]}}, $$row[0] ) unless $map{$$row[1]}{$$row[2]}{$$row[0]}++;

##</code><code>##

push ( @{$map{$$row[1]}{$$row[2]}}, $$row[0] ) unless ${$map{$$row[1]}{$$row[2]}{$$row[0]}}++;

##</code><code>##

push ( @{$map{$$row[1]}{$$row[2]}}, $$row[0] ) unless grep { /$$row[0]/ } @{$map{$$row[1]}{$$row[2]}};