Select Code to Download

    @actual       %indexOf    @keyFor
0 [ A_value ]    { A => 0 }   [  A  ]
...
2 [ C_value ]    { C => 2 }   [  C  ]
3 [ D_value ]    { D => 3 }   [  D  ]
4 [ E_value ]    { E => 4 }   [  E  ]

sub getByKey {
    my $key = shift;
...
    
    return $value
}

    @actual       %indexOf    @keyFor
0 [ C_value ]*   { A => 1 }*  [  C  ]*
...
2 [ B_value ]    { C => 0 }*  [  B  ]*
3 [ D_value ]    { D => 3 }*  [  D  ]*
4 [ E_value ]    { E => 4 }*  [  E  ]*

  @keys        %valByKey         %keyByValRef 
0 [ A ]    { A => \A_value }   { \A_value => A }
...
2 [ C ]    { C => \C_value }   { \C_value => C }
3 [ D ]    { D => \D_value }   { \D_value => D }
4 [ E ]    { E => \E_value }   { \E_value => E }

sub getByKey {
    my $key = shift;
...
    
    return $value;
}

  @keys        %valByKey           %idxByVal
0 [ A ]    { A => \A_value }   { \A_value => 0 }
...
2 [ C ]    { C => \C_value }   { \C_value => 2 }
3 [ D ]    { D => \D_value }   { \D_value => 3 }
4 [ E ]    { E => \E_value }   { \E_value => 4 }

sub getByKey {
    my $key = shift;
...
    
    return $value;
}

  @keys        %valByKey           %idxByVal
0 [ C ]    { A => \A_value }   { \A_value => 0 }
...
2 [ B ]    { C => \C_value }   { \C_value => 2 }
3 [ D ]    { D => \D_value }   { \D_value => 3 }
4 [ E ]    { E => \E_value }   { \E_value => 4 }