# WordNet::SenseRelate::Instance v0.09
# (Last updated $Id: Instance.pm,v 1.5 2006/12/24 12:18:45 sidz1979 Exp $)
package WordNet::SenseRelate::Instance;
use strict;
use vars qw($VERSION @ISA);
@ISA = qw(Exporter);
$VERSION = '0.09';
# Constructor for this module
sub new
{
my $class = shift;
my $self = {};
# Create the Instance object
$class = ref $class || $class;
bless($self, $class);
# Set the Instance
$self->{word} = "";
my $word = shift;
$self->{word} = $word if (defined $word);
return $self;
}
# Return the Instance
sub getInstance
{
my $self = shift;
return undef if (!defined $self || !ref $self);
return $self->{word};
}
1;
__END__
=head1 NAME
WordNet::SenseRelate::Instance - Perl module that represents a context, including a target
word and surrounding context words.
=head1 SYNOPSIS
use WordNet::SenseRelate::Instance;
=head1 DESCRIPTION
WordNet::SenseRelate::Instance represents a piece of text, including a target word that
requires to be disambiguated. Essentially, an instance is a set of Word objects, with
one Word object marked as the target word.
=head2 EXPORT
None by default.
=head1 SEE ALSO
perl(1)
WordNet::SenseRelate::TargetWord(3)
WordNet::SenseRelate::Word(3)
=head1 AUTHOR
Ted Pedersen, tpederse at d.umn.edu
Siddharth Patwardhan, sidd at cs.utah.edu>
Satanjeev Banerjee, banerjee+ at cs.cmu.edu
=head1 COPYRIGHT AND LICENSE
Copyright (C) 2005 by Ted Pedersen, Siddharth Patwardhan, and Satanjeev Banerjee
This library is free software; you can redistribute it and/or modify
it under the same terms as Perl itself, either Perl version 5.8.3 or,
at your option, any later version of Perl 5 you may have available.
=cut