It is easy enough to generate a "correctly" (in terms of ease-of-programming) directed hash from "flipped" values from a config file:
Untested pseudo-code:

my %correct;

while (<config-file>){
  ::Read data in the form
  $dest_hash_name, $text, [other info...]

  $correct{$text} = Generate_hashref($dest_hash_name);
}
[download]