/ 
Text-Tradition-0.2
River stage one • 2 direct dependents • 2 total dependents
/ Text::Tradition::Witness

NAME

Text::Tradition::Witness - a manuscript witness to a text tradition

SYNOPSIS

use Text::Tradition::Witness;
my $w = Text::Tradition::Witness->new( 
  'sigil' => 'A',
  'identifier' => 'Oxford MS Ex.1932',
  );

DESCRIPTION

Text::Tradition::Witness is an object representation of a manuscript witness to a text tradition. A manuscript has a sigil (a short code that represents it in the wider tradition), an identifier (e.g. the library ID), and probably a text.

METHODS

new

Create a new witness. Options include:

  • sigil - A short code to represent the manuscript. Required.

  • text - An array of strings (words) that contains the text of the manuscript. This should not change after the witness has been instantiated, and the path through the collation should always match it.

  • layertext - An array of strings (words) that contains the layered text, if any, of the manuscript. This should not change after the witness has been instantiated, and the path through the collation should always match it.

  • source - A reference to the text, such as a filename, if it is not given in the 'text' option.

  • identifier - The recognized name of the manuscript, e.g. a library identifier.

  • other_info - A freeform string for any other description of the manuscript.

sigil

Accessor method for the witness sigil.

text

Accessor method to get and set the text array.

source

Accessor method to get and set the text source.

identifier

Accessor method for the witness identifier.

other_info

Accessor method for the general witness description.

is_layered

Boolean method to note whether the witness has layers (e.g. pre-correction readings) in the collation.

BUGS / TODO

  • Get rid of either text or path, as they are redundant.

  • Re-think the mechanism for pre-correction readings etc.

LICENSE

This package is free software and is provided "as is" without express or implied warranty. You can redistribute it and/or modify it under the same terms as Perl itself.

AUTHOR

Tara L Andrews <aurum@cpan.org>