76: if ($node->{Data})
77: {
78:     die "oops: node Char='$node->{Char}'" if $node->{Char} ne "";
79:     $val = $node->{Data};
80: }

##</code><code>##

76: if ($node->{Data})
77: {
78:     if ($node->{Char} =~ m/^\s*$/) {
79:         $node->{Char} = "";
80:     } else {
81:         die "oops [$node->{Char}]";
82:     }
83:     $val = $node->{Data};
84: }