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

NAME

Lingua::EN::Opinion - Measure the positive/negative sentiment of text

VERSION

version 0.01

SYNOPSIS

  use Lingua::EN::Opinion;
  my $opinion = Lingua::EN::Opinion->new( file => '/some/file.txt' );
  $opinion->analyze();
  my $sentences = $opinion->sentences;
  my $scores = $opinion->scores;

DESCRIPTION

A Lingua::EN::Opinion measures the positive/negative sentiment of text.

Please see the eg/ and t/ scripts for example usage.

ATTRIBUTES

file

The text file to analyze.

sentences

Computed result.

scores

Computed result.

METHODS

new()

  $opinion = Lingua::EN::Opinion->new(%arguments);

Create a new Lingua::EN::Opinion object.

analyze()

  $score = $opinion->analyze();

Measure the positive/negative sentiment of text.

SEE ALSO

Moo

File::Slurper

Lingua::EN::Sentence

https://www.cs.uic.edu/~liub/FBS/sentiment-analysis.html#lexicon

TO DO

Transform the scores into binned percentages.

AUTHOR

Gene Boggs <gene@cpan.org>

COPYRIGHT AND LICENSE

This software is copyright (c) 2018 by Gene Boggs.

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