Have you played with the perl4 era $hash{$x,$y,$z} syntax? That takes those scalars and builds a hash key for you that is the three values joined with a magic char (FS (28 decimal) by default).

You could do much of this on your own, but I'm hoping that since Perl supports it, it is faster. Dunno. You'd have to test.