# Clear the fields we are not editing, leave fields we are blanking
foreach( my $i = 0; $i < scalar @values; $i++ ){
unless( $values[$i] || grep { $subfields[$i] } @disabled ){
unless( $values[$i] || $searches[$i] || grep { $subfields[$i] } @disabled ){
splice(@values,$i,1);
splice(@subfields,$i,1);
splice(@tags,$i,1);
splice(@searches,$i,1);
splice(@replaces,$i,1);
splice(@modifiers,$i,1);
}
-