Re: Two dimensional sets intersection

[daxim]

This is a FAQ.

use Hash::MultiKey;
tie my %valid, 'Hash::MultiKey';
%valid = (
    [qw(A q)] => 1,
    [qw(A u)] => 6,
    [qw(A k)] => 3,
    [qw(C t)] => 10,
    [qw(Z u)] => 30,
);