Program Repair Shop

The Loaded Uzi

In extreme cases you see:

        for $key (keys %hash) {
          if ($key eq 'name') {
            check_name($hash{$key});
          elsif ($key eq 'address') {
            check_address($hash{$key});
          } elsif ...
        }

Of course, it should be:

        check_name($hash{name});
        check_address($hash{address});
        ...