Select Code to Download

my %inits = (
   1 => [1, 0, 9],
...
   $p = $i[1];
   $v = $i[2];
}

my %inits = (
   1 => [2, 0, 9],
...
   # rest of the values go here
);
($i, $p, $v) = @{$inits{$h}} if $inits{$h};