=encoding utf-8

=head1 NAME

DB::Object::Operator - Operator Object

=head1 SYNOPSIS

    my $op = $dbh->AND( login => 'joe', status => 'active' );
    # will produce:
    WHERE login = 'joe' AND status = 'active'

    my $op = $dbh->AND( login => 'joe', status => $dbh->NOT( 'active' ) );
    # will produce:
    WHERE login = 'joe' AND status != 'active'

    my $op = $dbh->OR( login => 'joe', login => 'john' );
    # will produce:
    WHERE login = 'joe' OR login = 'john'

=head1 DESCRIPTION

This is a base class for operator objects like L<DB::Object::AND>, L<DB::Object::OR>, and L<DB::Object::NOT>

=head1 METHODS

=head2 new

Takes a list of values that are saved in the newly created object returned.

=head2 operator

Returns nothing by default. The actual value returned is provided by the inheriting package.

=head2 value

In list context, returns an array of those values passed to L</new> and in scalar context, it returns those value as array reference.

=head1 SEE ALSO

L<DBI>, L<Apache::DBI>

=head1 AUTHOR

Jacques Deguest E<lt>F<jack@deguest.jp>E<gt>

=head1 COPYRIGHT & LICENSE

Copyright (c) 2019-2021 DEGUEST Pte. Ltd.

You can use, copy, modify and redistribute this package and associated
files under the same terms as Perl itself.

=cut