193ab11 11 years ago
1 contributor
26 lines | 0.416kb
package DBIx::Custom::NotExists;

use strict;
use warnings;

my $not_exists = bless {}, 'DBIx::Custom::NotExists';

sub singleton { $not_exists }

=head1 NAME

DBIx::Custom::NotExists - Not exsits object

=head1 SYNOPSYS

  $not_exists = DBIx::Custom::NotExists->singleton;

=head1 METHODS

=head2 C<singleton>

  $not_exists = DBIx::Custom::NotExists->singleton;

L<DBIx::Custom::NotExists> singleton object.

=cut