David L. Day > Lingua-AtD-1.121570 > Lingua::AtD::Scores

Download:
Lingua-AtD-1.121570.tar.gz

Dependencies

Annotate this POD

Website

CPAN RT

Open  0
View/Report Bugs
Module Version: 1.121570   Source  

NAME ^

Lingua::AtD::Scores - Encapsulate conversion of XML from /stats call to Metric objects.

VERSION ^

version 1.121570

SYNOPSIS ^

    use Lingua::AtD;

    # Create a new service proxy
    my $atd = Lingua::AtD->new( {
        host => 'service.afterthedeadline.com',
        port => 80
        throttle => 2,
    });

    # Run spelling and grammar checks. Returns a Lingua::AtD::Response object.
    my $doc_check = $atd->check_document('Text to check.');
    # Loop through reported document errors.
    foreach my $atd_error ($doc_check->get_errors()) {
        # Do something with...
        print "Error string: ", $atd_error->get_string(), "\n";
    }

    # Run only grammar checks. Essentially the same as
    # check_document(), sans spell-check.
    my $grmr_check = $atd->check_grammar('Text to check.');
    # Loop through reported document errors.
    foreach my $atd_error ($grmr_check->get_errors()) {
        # Do something with...
        print "Error string: ", $atd_error->get_string(), "\n";
    }

    # Get statistics on a document. Returns a Lingua::AtD::Scores object.
    my $atd_scores = $atd->stats('Text to check.');
    # Loop through reported document errors.
    foreach my $atd_metric ($atd_scores->get_metrics()) {
        # Do something with...
        print $atd_metric->get_type(), "/", $atd_metric->get_key(),
            " = ", $atd_metric->get_value(), "\n";
    }

DESCRIPTION ^

Encapsulates conversion of the XML response from the AtD server into a list of spelling/grammar/style metric objects (Lingua::AtD::Metric).

METHODS ^

new

    # Possible, but not likely
    my $atd_scores = Lingua::AtD::Scores->new($xml_response);
    foreach my $atd_metric ($atd_scores->get_metrics()) {
        # Do something really fun...
    }

Lingua::AtD::Scores objects should only ever be created from a method calls to Lingua::AtD. However, if you have saved XML responses from prior calls to AtD, you can use this object to convert those responses into PERL objects. I won't stop you.

See the SYNOPSIS for typical usage.

has_server_exception

Convenience method to see if the AtD server returned an error message.

get_server_exception

Exception message from the server.

has_metrics

Convenience method to see if the XML response from AtD actually contained any metrics.

get_metric_count

Returns the number of linguistic metrics generated by AtD.

get_metrics

Returns a list of linguistic metrics as Lingua::AtD::Metric objects. For details on what metrics are supplied, see the API Documentation.

get_xml

Returns a string containing the raw XML response from the AtD service call.

SEE ALSO ^

See the API Documentation at After the Deadline's website.

AUTHOR ^

David L. Day <dday376@gmail.com>

COPYRIGHT AND LICENSE ^

This software is copyright (c) 2011 by David L. Day.

This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.

syntax highlighting: