David James > Lingua-EN-Segmenter-0.1 > Lingua::EN::Segmenter::Evaluator

Download:
Lingua-EN-Segmenter-0.1.tar.gz

Dependencies

Annotate this POD

CPAN RT

New  4
Open  0
View/Report Bugs
Module Version: 0.1   Source  

NAME ^

Lingua::EN::Segmenter::Evaluator - Evaluate a segmenting method

SYNOPSIS ^

    my $tiling_segmenter = Lingua::EN::Segmenter::TextTiling->new();

    foreach (@ARGV) {
        my $input = read_file($_);

        print "\nFile name: $_\n";

        printf "Results from TextTiling algorithm:
      Strict scoring:       %2d%% recall, %2d%% precision
      Relaxed scoring:      %2d%% recall, %2d%% precision
      V. relaxed scoring:   %2d%% recall, %2d%% precision
    ", calc_stats(evaluate_segmenter($tiling_segmenter,20,$input));
    }

DESCRIPTION ^

See synopsis.

Also check out segmenter.pl in the eg directory.

BUGS ^

This module only works correctly when the segmenter has a MIN_SEGMENT_SIZE >= 2.

AUTHORS ^

David James <splice@cpan.org>

SEE ALSO ^

Lingua::EN::Segmenter::TextTiling, Lingua::EN::Segmenter::Evaluator, http://www.cs.toronto.edu/~james

syntax highlighting: