The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

DTA::TokWrap::Processor::tcfdecode - DTA tokenizer wrappers: TCF->TEI+ws decoding via proxy document

SYNOPSIS

 use DTA::TokWrap::Processor::tcfdecode;
 
 $dec = DTA::TokWrap::Processor::tcfdecode->new(%opts);
 $doc_or_undef = $dec->tcfdecode($doc);

DESCRIPTION

DTA::TokWrap::Processor::tcfdecode provides an object-oriented DTA::TokWrap::Processor wrapper for decoding the tokens and sentences layers as extracted from a TCF document by the DTA::TokWrap::Processor::tcfdecode0 processor into the decoded TEI textSource layer as w and s elements.

Constants

@ISA

DTA::TokWrap::Processor::tcfdecode inherits from DTA::TokWrap::Processor.

Constructors etc.

new
 $obj = $CLASS_OR_OBJECT->new(%args);

Constructor. Options in %args:

 'att.linguistic' => $bool,  ##-- if true, use TEI att.linguistic features (default=1)
defaults
 %defaults = $CLASS->defaults();

Static class-dependent defaults.

Methods

tcfdecode
 $doc_or_undef = $CLASS_OR_OBJECT->tcfdecode($doc);

Decodes the token- and sentence-structure extracted from a TCF document and merges the results into the original TEI, assuming that the original encoding was done by TokWrap. Uses a proxy DTA::TokWrap::Document object to perform the decoding.

Relevant %$doc keys:

 tcfxfile => $tcfxfile,     ##-- (input) TEI-XML decoded from TCF
 tcftfile => $tcftfile,     ##-- (input) text data decoded from TCF
 tcfwfile => $tcfwfile,     ##-- (input) tokenized data decoded from TCF, without byte-offsets, with "SID/WID" attributes
 ##
 tcfcwsfile => $tcfcwsfile, ##-- (output) tcf-decoded+aligned+ws-spliced output file
 tcfdecode_stamp0 => $f,    ##-- (output) timestamp of operation begin
 tcfdecode_stamp  => $f,    ##-- (output) timestamp of operation end

SEE ALSO

DTA::TokWrap::Intro(3pm), dta-tokwrap.perl(1), ...

SEE ALSO

DTA::TokWrap::Intro(3pm), dta-tokwrap.perl(1), ...

AUTHOR

Bryan Jurish <moocow@cpan.org>

COPYRIGHT AND LICENSE

Copyright (C) 2014-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.