$ perl -MData::Dumper -le 'print Dumper {[(110,FB),(100,F)]}'
$VAR1 = {
          'ARRAY(0x125560)' => undef
        };