sub getValue {
        my $self = shift;

        return $self->{theValue};
}