- or download this
#!/usr/bin/perl
%trans = (
...
$input =~ s/($re)/exists($trans{$1}) ? $trans{$1} : $1/geo;
print $input, "";
}
- or download this
<?xml version="1.0" encoding="UTF-8"?>
<ANNOTATION_DOCUMENT>
...
</ANNOTATION>
</TIER>
</ANNOTATION_DOCUMENT>
- or download this
<ANNOTATION_VALUE>menö šuöny niko</ANNOTATION_VALUE>
- or download this
<TIER LINGUISTIC_TYPE_REF="orthT" PARENT_REF="ref@S1" PARTICIPANT="S1"
+ TIER_ID="orth@S1">
</TIER>
- or download this
<?xml version="1.0" encoding="UTF-8"?>
<ANNOTATION_DOCUMENT>
...
</ANNOTATION>
</TIER>
</ANNOTATION_DOCUMENT>