my $param = join(q{, }, map{qq{$_ => $$ref2{$_}}} keys %$ref2); #### 4 => HASH(0x5755668), 3 => HASH(0x55ddbb8), 2 => HASH(0x574e670), 9 => HASH(0x5767a18), 11 => HASH(0x5527fd8), 1 => HASH(0x574f230), 8 => HASH(0x5639d48), 6 => HASH(0x574c6c8), 7 => HASH(0x54fae40), 12 => HASH(0x5747fc8), 5 => HASH(0x562be30), 13 => HASH(0x57633d0), 10 => HASH(0x57648f8)