Select Code to Download

%hash = ();
{
...
        $hash { $keys [$c] } = $values [ $c ];
    }
}

@hash { qw (a, b, c) } = 1..3;