Select Code to Download

        # match character data
        } elsif( $text =~ /(^[^&&>]+)/ ) {
...
            # make sure the data is inside an element
            return if( $data =~ /\S/ and not( @elements ));
            $text = $';

$rc=is_well_formed ("<memo>
  <to>self</to>
...
    }
    return 1;
}