DTA::TokWrap::Processor::txmlanno - Descript: DTA tokenizer wrappers: t.xml -> t.xml, via idsplice
use DTA::TokWrap::Processor::txmlanno;
$txa = DTA::TokWrap::Processor::txmlanno->new(%opts);
$doc_or_undef = $CLASS_OR_OBJECT->txmlanno($doc);
DTA::TokWrap::Processor::txmlanno provides an object-oriented DTA::TokWrap::Processor wrapper for adding annotations to a "master" tokenized XML (.t.xml) format, for use with DTA::TokWrap::Document objects.
Most users should use the high-level DTA::TokWrap wrapper class instead of using this module directly.
DTA::TokWrap::Processor::txmlanno inherits from DTA::TokWrap::Processor.
$txa = $CLASS_OR_OBJECT_>new(%args);
Constructor.
%args, %$t2x:
annojoin=>$bool, ##-- if true, add TEI att.linguistic 'join' feature (default:false; uses regex hack)
%defaults = CLASS->defaults();
Static class-dependent defaults.
$doc_or_undef = $CLASS_OR_OBJECT->txmlanno($doc);
$doc_or_undef = $CLASS_OR_OBJECT->txmlanno($doc,%opts);
Inserts supplementary annotations into "master" tokenized XML (.t.xml) in the DTA::TokWrap::Document object $doc. If specified, %opts override $CLASS_OR_OBJECT sorting and parsing defaults.
Relevant %$doc keys:
axtokdatakey => $axdatakey, ##-- (input) XML annotation data key (default='axtokdata')
axtokdata => $axtokdata, ##-- (input) XML annotations to be spliced in (optional)
xtokdata => $xtokdata, ##-- (input+output)
## + input : un-annotated XML-ified tokenizer output data
## + output : annotated XML-ified tokenizer output data
xtokfile0 => $xtokfile0, ##-- (output) save original $xtokdata (optional)
txmlanno_stamp0 => $f, ##-- (output) timestamp of operation begin
txmlanno_stamp => $f, ##-- (output) timestamp of operation end
xtokdata_stamp => $f, ##-- (output) timestamp of operation end
DTA::TokWrap::Intro(3pm), dta-tokwrap.perl(1), ...
Bryan Jurish <jurish@bbaw.de>
Copyright (C) 2018 by Bryan Jurish
This package is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.14.2 or, at your option, any later version of Perl 5 you may have available.