Help for this page

Select Code to Download


  1. or download this
    foreach my $rule ( keys %$rulelist ){
  2. or download this
       if ( defined $rulelist->{$rulenum}->{REGION} ){
      my $rule = $rulelist->{$rulenum}->{REGION};
...
      }
      elsif ( $line -> {REGIONID} != $rule)  { next RULE };
      ...
  3. or download this
       if ( defined (my $rule = $rulelist->{$rulenum}->{REGION} )){
      next RULE if ( $rule =~ s/!// && $line->{REGIONID} == $rule);
      next RULE if ( $line->{REGIONID} != $rule);
      ...