Lines Matching refs:field
148 # Compare the values of each field; print any differences
149 foreach my $field ( sort keys %section1 ) {
150 if ($section1{$field} ne $section2{$field}) {
151 my $diff1 = compareValues($section1{$field}, $section2{$field});
152 my $diff2 = compareValues($section2{$field}, $section1{$field});
167 print "\t$field\n";
175 } # end foreach field
225 my @field = split( /=/, $line );
226 my $fieldName = $field[0];
227 my $value = $field[1];