NAME

DTA::TokWrap::Processor::tcfencode - DTA tokenizer wrappers: TEI->TCF encoding

SYNOPSIS

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

DESCRIPTION

DTA::TokWrap::Processor::tcfencode provides an object-oriented DTA::TokWrap::Processor wrapper for encoding (serialized) TEI-XML as TCF ("Text Corpus Format", cf. http://weblicht.sfs.uni-tuebingen.de/weblichtwiki/index.php/The_TCF_Format) using DTA::TokWrap::Document objects.

Constants

@ISA: DTA::TokWrap::Processor::tcfencode inherits from DTA::TokWrap::Processor.

Constructors etc.

new

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

Constructor.

defaults

 %defaults = $CLASS->defaults();

Static class-dependent defaults.

Methods

tcfencode

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

Converts the DTA::TokWrap::Document object to TCF, storing the result as an XML::LibXML::Document in $doc->{tcfdoc}.

Relevant %$doc keys:

 xmlfile => $xmlfile, ##-- (input) source TEI-XML file
 txtfile => $txtfile, ##-- (input) serialized text file
 xmldata => $xmldata, ##-- (input,alternate) source TXT-XML buffer
 txtdata => $txtdata, ##-- (input,alternate) serialized text data
 ##
 tcfdoc  => $tcfdoc,   ##-- (output) TCF output document
 tcfencode_stamp0 => $f, ##-- (output) timestamp of operation begin
 tcfencode_stamp  => $f, ##-- (output) timestamp of operation end
 tcfdoc_stamp   => $f, ##-- (output) timestamp of operation end

AUTHOR

Bryan Jurish <jurish@bbaw.de>

COPYRIGHT AND LICENSE

This package is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.24.1 or, at your option, any later version of Perl 5 you may have available.