+ if ( $v =~ s/\s+([a-zA-Z]\S+)\s*:\s*(\S*.*?)\s*$// ) {
+ # strip second column
+ my ($n2,$v2) = ($1,$2);
+ $n2 =~ s/\(.+\)//;
+ $hash->{ $section . $n2 } = $v2;
+ warn "## $n2 = $v2\n";
+ } elsif ( $v =~ s/(\d+)([a-zA-Z]\S+)\s*:\s*(\S*.*?)\s*$/$1/ ) { # numberField without space