package DBIx::Custom::Query; use strict; use warnings; use base 'Object::Simple'; __PACKAGE__->attr([qw/sql key_infos default_filter filter sth/]); 1; =head1 NAME DBIx::Custom::Query - DBIx::Custom query =head1 SYNOPSIS # New my $query = DBIx::Custom::Query->new; # Create by using create_query my $query = DBIx::Custom->create_query($template); =head1 ATTRIBUTES =head2 sth Statement handle $query = $query->sth($sth); $sth = $query->sth; =head2 sql SQL $query = $query->sql($sql); $sql = $query->sql; =head2 default_filter Filter excuted when value is bind $query = $query->default_filter($default_filter); $default_filter = $query->default_filter; =head2 filter Filter excuted when value is bind $query = $query->filter($filter); $filter = $query->filter; =head2 key_infos Key informations $query = $query->key_infos($key_infos); $key_infos = $query->key_infos; =head1 METHODS This class is L subclass. You can use all methods of L =head2 new my $query = DBIx::Custom::Query->new; =cut