@@ -1,3 +1,5 @@

+0.1644

+  update pod

 0.1643

   add experimental selection option to select()

   add experimental table tag

@@ -341,6 +341,20 @@ Following SQL is executed.

 C<appned> is also used at C<insert()>, C<update()>, C<update_all()>

 C<delete()>, C<delete_all()>, and C<select()>.

+Instead of C<column> and C<table>,

+you can use C<selection>.

+This is used to specify column names and table names at once

+

+    my $selection = <<"EOS";

+    title, author, company_name

+    from book inner join company on book.company_id = company.id

+    EOS

+

+    $dbi->select(selection => $selection);

+

+Note that you can't use where clause in C<selection>.

+use clause like "inner join".

+

 =head3 C<execute()> SQL

 use C<execute()> to execute SQL

@@ -562,6 +576,18 @@ You can also use column name which contains table name.

         where => {'book.issue_date' => $tp}

     );

+In fetching, Filter is effective if you use "TABLE__COLUMN" as column name.

+

+    my $result = $dbi->execute(

+       "select issue_date as book__issue_date from book");

+

+You can apply C<end> filter execute after C<in> filter.

+

+    $dbi->apply_filter('book',

+        issue_date => {out => 'tp_to_date', in => 'date_to_tp',

+                       end => 'tp_to_displaydate'},

+    );

+

 =head3 Individual filter C<filter>

 You can apply individual filter .

@@ -661,9 +687,6 @@ If you want to use these, escape it by '\';

 \ is perl's escape character, you need two \.

-C<\>���̂�Perl�̃G�X�P�[�v�����ł��̂ŁA

-C<\>�͓�•K�v�ɂȂ�܂��B

-

 Tag is expanded before executing SQL.

     select * from book where title = ? and author like ?;

@@ -683,10 +706,9 @@ You can specify C<filter()> at C<execute()>.

 Note that at C<execute()> the filter applied by C<apply_filter()>

 don't has effective to columns.

-You need specify C<table> to have effective.

+You have to use C<table> tag in SQL

-    $dbi->execute($sql, param => {title => 'Perl', author => '%Ken%'}

-                  table => ['book']);

+    my $sql = "select * from {table book} where {= author} and {like title};"

 =head3 Tag list

@@ -694,6 +716,14 @@ L<DBIx::Custom>

 The following tag is available.

+=head4 C<table>

+

+    {table NAME} -> NAME

+

+This is used to specify table name in SQL.

+If you specify table name, Filtering by 

+C<apply_filter()> is effective.

+

 =head4 C<?>

     {? NAME}    ->   ?

@@ -950,77 +980,56 @@ C<execute()>

     $dbi->execute($sql, param => $param);

-=head2 7. �e�[�u�����f��

-

-=head3 �e�[�u���I�u�W�F�N�g�̍쐬 C<table()>

+=head2 7. Table object

-L<DBIx::Custom>�̓��W�b�N�Ƃ��ăe�[�u���𒆐S�ɂ�����

-���f���̍쐬��x�����܂��B

+=head3 Create table object C<table()>

-�A�v���P�[�V�����̃��W�b�N��L�q����Ƃ��ɁA���̃��W�b�N��

-�f�[�^�x�[�X�̃e�[�u���ɂ����邱�Ƃ́ARDBMS�𗘗p����

-���f���ł���΁A�R�[�h�̏d�����Ȃ�

-�킩��₷����̂ɂȂ�܂��B

-

-�e�[�u���I�u�W�F�N�g�𐶐�����ɂ�C<table()>��g�p���܂��B

+You can create table object to access table in database.

+use C<tabel()> to create table object.

     my $table = $dbi->table('book');

-��ۂɃf�[�^�x�[�X�Ƀe�[�u���͑��݂��Ă���K�v�͂���܂���B

-����͉��z�I�ȃe�[�u���I�u�W�F�N�g�ł��B�����

-L<DBIx::Customm::Table>�I�u�W�F�N�g�ɂȂ�܂��B

-

-�e�[�u���I�u�W�F�N�g�����C<insert()>�AC<update()>�AC<update_all()>�A

-C<delete()>�AC<delete_all()>�AC<select()>�Ȃǂ̃��\�b�h�Ăяo�����Ƃ��ł��܂��B

-L<DBIx::Custom>�ƈقȂ�Ƃ���́AC<table>��K������w�肷��K�v��

-�Ȃ��Ƃ������Ƃł��B

+Return value is L<DBIx::Custom::Table>.

+From table object, you can call C<insert()>, C<update()>, C<update_all()>�A

+C<delete()>, C<delete_all()>, C<select()>.

+You don't have to specify table name.

     $table->insert(param => $param);

-C<table���̒l�͎����I��book�ɐݒ肳��܂��B

-

-�܂��e�[�u���I�u�W�F�N�g�ɂ͓Ǝ��̃��\�b�h��lj���邱�Ƃ��ł��܂��B

+You can add any method to table object.

     $table->method(

         register => sub {

             my $self = shift;

             my $table_name = $self->name;

-            # something

+            # ...

         },

-        list => sub {

-            my $self = shift;

-            my $table_name = $self->name;

-            # something

-        }

+        list => sub { ... }

     );

-���\�b�h�ɓn���������L<DBIx::Custom::Table>�I�u�W�F�N�g�ł��B

-C<name()>��g�p���āA�e�[�u������擾���邱�Ƃ��ł��܂��B

+You can get table name by C<name()>.

-���̂悤�ɂ��ēo�^�������\�b�h�͒��ڌĂяo�����Ƃ��ł��܂��B

+You can call these method from table object.

     $table->register(...);

     $table->list(...);

-�܂��e�[�u����p�̃��\�b�h��I�[�o�[���C�h���č쐬���邱�Ƃ�ł��܂��B

+=head2 Use L<DBIx::Custom> and <DBI> methods

-    $table->method(

-        insert => sub {

-            my $self = shift;

-            

-            $self->base_insert(...);

-            

-            # something

-        }

-    );

+You can call all methods of L<DBIx::Custom> and L<DBI>

-��Ƃ�Ƒ��݂��Ă���C<insert()>��ĂԂɂ�C<base_$method>�Ƃ��܂��BL<DBIx::Custom::Table>

-�̃I�[�o�[���C�h�̋@�\�͊ȈՓI�Ȃ�̂ł����A�ƂĂ�֗��ł��B

+    # DBIx::Custom method

+    $table->execute($sql);

+    

+    # DBI method

+    $table->begin_work;

+    $table->commit;

-=head2 �e�[�u���ŋ��L�̃��\�b�h�̓o�^

+=head2 Add table shared method

-���ׂẴe�[�u���Ń��\�b�h��L����ɂ�C<table>���\�b�h�Ńe�[�u����쐬����O�ɁA

-C<base_table>�Ƀ��\�b�h��o�^���Ă����܂��B

+To share methods in all tables,

+add method to base table.

+You can get base table by C<base_table()>.

     $dbi->base_table->method(

         count => sub {

@@ -1029,19 +1038,27 @@ C<base_table>

         }

     );

-�܂��e�[�u�������L<DBIx::Custom>��L<DBI>�̂��ׂẴ��\�b�h��Ăяo�����Ƃ��ł��܂��B

+This method is used by all talbes.

-    # DBIx::Custom method

-    $table->execute($sql);

-    

-    # DBI method

-    $table->begin_work;

-    $table->commit;

+    $dbi->table('book')->count(...);

-=head2 ��ʓI�ȃ��f���̍\��

+Even if same method name is added to table,

+You can use base table method by C<base_METHOD()>.

-��ʓI�ɂ́AL<DBIx::Custom>��p�����ăR���X�g���N�^�̒��ɁA���f����쐬

-����̂��悢�ł��傤�B

+    $table->method(

+        count => sub {

+            my $self = shift;

+            

+            $self->base_count(...);

+            

+            # ...

+        }

+    );

+

+=head2 Model example

+

+Generally, it is good to create model in constructor

+in the class extending L<DBIx::Custom>.

     package MyDBI;

@@ -1051,82 +1068,63 @@ C<base_table>

         my $self = shift->SUPER::connect(@_);

         $self->base_table->method(

-            ... => sub { ... }

+            delete_multi => sub { ... }

         );

         $self->table('book')->method(

-            insert_multi => sub { ... },

-            ... => sub { ... }

+            register => sub { ... },

+            remove   => sub { ... },

         );

         $self->table('company')->method(

-            ... => sub { ... },

+            register => sub { ... },

+            remove   => sub { ... },

         );

     }

-���̂悤�ɂ��Ē�`���Ă����΁A���̂悤�ɗ��p���邱�Ƃ��ł��܂��B

+You can use this class in the following way.

     my $dbi = MyDBI->connect(...);

-    $dbi->table('book')->insert_multi(...);

-

-=head2 8. �p�t�H�[�}���X�̉�P

-

-=head3 �N�G���̍쐬

+    $dbi->table('book')->delete_multi(...);

-��C<insert()>���\�b�h��g�p���ăC���T�[�g���s�����ꍇ�A

-�K�v�ȃp�t�H�[�}���X�𓾂��Ȃ��ꍇ�����邩����܂���B

-C<insert()>���\�b�h�́ASQL���ƃX�e�[�g�����g�n���h����

-����쐬���邽�߂ł��B

+=head2 8. Improve performance

-���̂悤�ȏꍇ�́AC<query>�I�v�V������w�肷�邱�ƂŁA

-�N�G����擾���邱�Ƃ��ł��܂��B

+=head3 Create query

-    my $query = $dbi->insert(table => 'book', param => $param, query => 1);

+If you can't get performance, create query by C<query> option.

+For example, many insert is needed.

-�܂�C<create_query()>���\�b�h��g��ĔC�ӂ�SQL�̃N�G����쐬

-���邱�Ƃ�ł��܂��B

-

-    my $query = $dbi->create_query(

-        "insert into book {insert_param title author};";

-    );

+    my $params = [

+        {title => 'Perl', author => 'Ken'},

+        {title => 'Good day', author => 'Tom'}

+    ]

+    my $query = $dbi->insert(table => 'book', param => $params->[0], query => 1);

-�߂�l��L<DBIx::Custom::Query>�I�u�W�F�N�g�ł��B

-���̃I�u�W�F�N�g��SQL���ƃp�����[�^�o�C���h���̗񖼂�

-�ێ����Ă��܂��B�܂��X�e�[�g�����g�n���h����ێ����Ă��܂��B

+Return value is L<DBIx::Custom::Query> object.

+This query is executed by C<execute()>.

-    {

-        sql     => 'insert into book (title, author) values (?, ?);',

-        columns => ['title', 'author'],

-        sth     => $sth

+    foreach my $param (@$params) {

+        $dbi->execute($query, $param);

     }

-�N�G���I�u�W�F�N�g��g��ČJ��Ԃ���s����ɂ�C<execute()>��g�p���܂��B

-    

-    my $params = [

-        {title => 'Perl',      author => 'Ken'},

-        {title => 'Good days', author => 'Mike'}

-    ];

-    

-    foreach my $param (@$paramss) {

-        $dbi->execute($query, table => 'book', param => $input);

-    }

+Performance is improved because statement handle is reused

+C<query> option is used in C<insert()>, C<update()>, C<update_all()>,

+C<delete()>, C<delete_all()>.

+

+Note that parameters count is same as method for creating query and C<execute()>.

-C<execute>���\�b�h�̑���ɃN�G���I�u�W�F�g��n�����Ƃ��ł��܂��B

-C<insert()>���\�b�h�������ł��B

+You can create query from any SQL by C<create_query()>.

-���ӓ_�������‚�����܂��B����̓p�����[�^�̐��͕K�������łȂ��Ă͂Ȃ�Ȃ�

-�Ƃ������Ƃł��B�ŏ���3�‚̃p�����[�^������n�����̂ɁA���̎�s�ł�

-��‚̃p�����[�^��n���Ɨ\��Ȃ����ʂɂȂ�܂��B�����

-���I�ɐ������ꂽSQL�Ɋ܂܂��v���[�X�z���_�̐����قȂ邩��ł��B

-�܂�C<execute()>�ɂ��Ă͎����I�ɂ̓t�B���^���L��ɂȂ�Ȃ��̂ŁA

-C<table>��w�肷��K�v�̂��邱�Ƃɒ��ӂ��Ă��������B

-�{���ɕK�v�ȏꍇ�������p���Ă��������B

+    my $query = $dbi->create_query(

+        "insert into book {insert_param title author};";

+    );

-=head2 9. ���̑��̋@�\

+=head2 9. Other features

-=head3 ���\�b�h�̓o�^

+=head3 Add method

-���\�b�h��o�^����ɂ�C<method()>��g�p���܂��B

+You can add method to L<DBIx::Custom> object.

+use C<method().

     $dbi->method(

         update_or_insert => sub {

@@ -1139,15 +1137,14 @@ C<table>

         }

     );

-<method()>�œo�^�������\�b�h��

-L<DBIx::Custom>�I�u�W�F�N�g���璼�ڌĂяo�����Ƃ��ł��܂��B

+You can call these methods from L<DBIx::Custom> object.

     $dbi->update_or_insert;

     $dbi->find_or_create;

-=head3 ���ʃN���X�̕ύX

+=head3 Change result class

-�K�v�Ȃ�Ό��ʃN���X��ύX���邱�Ƃ��ł��܂��B

+You can change result class. By default it is L<DBIx::Custom::Result>.

     package MyResult;

     use base 'DBIx::Custom::Result';

@@ -1165,16 +1162,14 @@ L<DBIx::Custom>

 =head3 �L���b�V���O

-�^�O�̓W�J���SQL�̓p�t�H�[�}���X�̗��R�̂��߂ɃL���b�V������܂��B

-�����C<chace>�Őݒ�ł��A�f�t�H���g�ł̓L���b�V����s���ݒ�ł��B

+SQL after parsing tag is cached for performance.

+You can set C<cache()>. By default, chaching is true.

     $dbi->cache(1);

-�L���b�V����@��C<cache_method>�Ƀ��\�b�h��w�肷�邱�Ƃ�

-�ύX���邱�Ƃ��ł��܂��B

-�f�[�^�̕ۑ��Ǝ擾�̂��߂̃��\�b�h���`���܂��B

-

-�f�t�H���g�ł͎��̂悤�Ƀ�������ɃL���b�V����s����̂ɂȂ�Ă��܂��B

+The way to cache is changed by C<cache_method()>.

+Default method is the following one.

+Cache is saved to memory.

     $dbi->cache_method(sub {

         sub {

@@ -1183,28 +1178,27 @@ L<DBIx::Custom>

             $self->{_cached} ||= {};

             if (@_ > 1) {

-                # Set

+                # Save cache

                 $self->{_cached}{$_[0]} = $_[1] 

             }

             else {

-                # Get

+                # Get cache

                 return $self->{_cached}{$_[0]}

             }

         }

     });

-����L<DBIx::Custom>�I�u�W�F�N�g�ł��B

-����̓^�O�̓W�J�����O��SQL�ł��B

-��O��̓^�O�̓W�J���SQL�ł��B

-

-�����ō쐬����ꍇ�͑�O�����݂����ꍇ�̓L���b�V����ݒ肵�A

-���݂��Ȃ�����ꍇ�̓L���b�V����擾��������

-�����������B

+First argument is L<DBIx::Custom> object.

+Second argument is SQL before parsing.

+Third argument is SQL information after parsing. This is hash reference.

-=cut

+If third argument exists, you save cache,

+and if third argument isn't exists, you get chace.

 =head1 EXAMPLES

+You can see exsamples in the following wiki.

+

 L<DBIx::Custom Wiki|https://github.com/yuki-kimoto/DBIx-Custom/wiki> - Many useful examples

 =cut

@@ -348,6 +348,19 @@ C<append>はSQLの末尾に追加される文字列です。

 またC<append>は、C<select>だけでなくC<insert()>、C<update()>、C<update_all()>

 C<delete()>、C<delete_all()>、C<select()>で使用することもできます。

+C<column>とC<table>を使用する代わりに、C<selection>を使用することも

+できます。列名とテーブル名をまとめて指定する場合に利用します。

+    

+    my $selection = <<"EOS";

+    title, author, company_name

+    from book inner join company on book.company_id = company.id

+    EOS

+

+    $dbi->select(selection => $selection);

+

+C<selection>においてはwhere句を利用できないということに注意してください。

+"inner join"などの句を利用してください。

+

 =head3 SQLの実行 C<execute()>

 SQLを実行するにはC<execute()>を使用します。

@@ -575,6 +588,19 @@ L<Time::Piece>オブジェクトに変換されます。

         where => {'book.title' => 'Perl', 'book.author' => 'Ken'}

     );

+フェッチを行う場合に"TABLE__COLUMN"という名前を使用した場合もフィルタは

+有効になります。

+

+    my $result = $dbi->execute(

+       "select issue_date as book__issue_date from book");

+

+C<in>フィルタの後に実行されるC<end>フィルタを適用することもできます。

+

+    $dbi->apply_filter('book',

+        issue_date => {out => 'tp_to_date', in => 'date_to_tp',

+                       end => 'tp_to_displaydate'},

+    );

+

 =head3 個別のフィルタ C<filter>

 個別にフィルタを適用することもできます。

@@ -693,13 +719,20 @@ C<execute()>においてもC<filter>を指定することができます。

 C<execute>ではC<apply_filter()>で適用されたフィルタ

 は有効ではないということに注意してください。

 C<apply_filter()>で適用されたフィルタを有効にするには、

-C<table>を指定する必要があります。

+C<table>タグを利用します。

-    $dbi->execute($sql, param => {title => 'Perl', author => '%Ken%'}

-                  table => ['book']);

+    my $sql = "select * from {table book} where {= author} and {like title};"

 =head3 タグ一覧

+=head4 C<table>

+

+    {table NAME} -> NAME

+

+これはSQLの中でテーブル名を指定する場合に利用します。

+テーブル名を指定することによって、C<apply_filter()>

+によるフィルタリングが有効になります。

+

 =head4 C<?>

     {? NAME}    ->   ?

@@ -957,36 +990,25 @@ C<execute()>との連携です。SQLを作成するときに埋め込むこと

     $dbi->execute($sql, param => $param);

-=head2 7. テーブルモデル

+=head2 7. テーブルオブジェクト

 =head3 テーブルオブジェクトの作成 C<table()>

-L<DBIx::Custom>はロジックとしてテーブルを中心にすえた

-モデルの作成を支援します。

-

-アプリケーションのロジックを記述するときに、そのロジックを

-データベースのテーブルにすえることは、RDBMSを利用する

-モデルであれば、コードの重複も少なく

-わかりやすいものになります。

+データベースのテーブルにアクセスするための

+テーブルオブジェクトを作成することができます。

 テーブルオブジェクトを生成するにはC<table()>を使用します。

     my $table = $dbi->table('book');

-実際にデータベースにテーブルは存在している必要はありません。

-これは仮想的なテーブルオブジェクトです。これは

-L<DBIx::Customm::Table>オブジェクトになります。

-

+戻り値はL<DBIx::Custom::Table>オブジェクトです。

 テーブルオブジェクトからはC<insert()>、C<update()>、C<update_all()>、

 C<delete()>、C<delete_all()>、C<select()>などのメソッド呼び出すことができます。

-L<DBIx::Custom>と異なるところは、C<table>を必ずしも指定する必要が

-ないということです。

+C<table>を指定する必要はありません。

     $table->insert(param => $param);

-C<table＞の値は自動的にbookに設定されます。

-

-またテーブルオブジェクトには独自のメソッドを追加することができます。

+テーブルオブジェクトには任意のメソッドを追加することができます。

     $table->method(

         register => sub {

@@ -994,40 +1016,32 @@ C<table＞の値は自動的にbookに設定されます。

             my $table_name = $self->name;

             # something

         },

-        list => sub {

-            my $self = shift;

-            my $table_name = $self->name;

-            # something

-        }

+        list => sub { ... },

     );

-メソッドに渡される第一引数はL<DBIx::Custom::Table>オブジェクトです。

 C<name()>を使用して、テーブル名を取得することができます。

-このようにして登録したメソッドは直接呼び出すことができます。

+このようにして登録したメソッドはテーブルオブジェクトから呼び出すことができます。

     $table->register(...);

     $table->list(...);

-またテーブル専用のメソッドをオーバーライドして作成することもできます。

+=head2 L<DBIx::Custom>と<DBI>のメソッドの利用

-    $table->method(

-        insert => sub {

-            my $self = shift;

-            

-            $self->base_insert(...);

-            

-            # something

-        }

-    );

+テーブルからはL<DBIx::Custom>とL<DBI>のすべてのメソッドを呼び出すことができます。

-もともと存在していたC<insert()>を呼ぶにはC<base_$method>とします。L<DBIx::Custom::Table>

-のオーバーライドの機能は簡易的なものですが、とても便利です。

+    # DBIx::Custom method

+    $table->execute($sql);

+    

+    # DBI method

+    $table->begin_work;

+    $table->commit;

-=head2 テーブルで共有のメソッドの登録

+=head2 テーブルで共有のメソッドの追加

-すべてのテーブルでメソッドを共有するにはC<table>メソッドでテーブルを作成する前に、

-C<base_table>にメソッドを登録しておきます。

+すべてのテーブルでメソッドを共有するには

+ベーステーブルにメソッドを登録します。

+ベーステーブルを取得するにはC<base_table>を使用します。

     $dbi->base_table->method(

         count => sub {

@@ -1036,16 +1050,24 @@ C<base_table>にメソッドを登録しておきます。

         }

     );

-またテーブルからはL<DBIx::Custom>とL<DBI>のすべてのメソッドを呼び出すことができます。

+このメソッドはすべてのテーブルから利用することができます。

-    # DBIx::Custom method

-    $table->execute($sql);

-    

-    # DBI method

-    $table->begin_work;

-    $table->commit;

+    $dbi->table('book')->count(...);

-=head2 一般的なモデルの構成

+また同名のメソッドをテーブルに追加して、ベーステーブルの

+メソッドを利用したい場合はC<base_METHOD()>と記述します。

+

+    $table->method(

+        count => sub {

+            my $self = shift;

+            

+            $self->base_count(...);

+            

+            # ...

+        }

+    );

+

+=head2 モデルのサンプル

 一般的には、L<DBIx::Custom>を継承してコンストラクタの中に、モデルを作成

 するのがよいでしょう。

@@ -1058,82 +1080,69 @@ C<base_table>にメソッドを登録しておきます。

         my $self = shift->SUPER::connect(@_);

         $self->base_table->method(

-            ... => sub { ... }

+            delete_multi => sub { ... }

         );

         $self->table('book')->method(

-            insert_multi => sub { ... },

-            ... => sub { ... }

+            register => sub { ... },

+            remove   => sub { ... },

         );

         $self->table('company')->method(

-            ... => sub { ... },

+            register => sub { ... },

+            remove   => sub { ... },

         );

     }

-このようにして定義しておけば、次のように利用することができます。

+次のようにこのクラスを利用することができます。

     my $dbi = MyDBI->connect(...);

-    $dbi->table('book')->insert_multi(...);

+    $dbi->table('book')->delete_multi(...);

+    $dbi->table('book')->register(...);

 =head2 8. パフォーマンスの改善

 =head3 クエリの作成

-もしC<insert()>メソッドを使用してインサートを実行した場合、

-必要なパフォーマンスを得られない場合があるかもしれません。

-C<insert()>メソッドは、SQL文とステートメントハンドルを

-毎回作成するためです。

+パフォーマンスが得られない場合はC<query>オプションを使って

+クエリを作成してみてください。

-そのような場合は、C<query>オプションを指定することで、

-クエリを取得することができます。

+    my $params = [

+        {title => 'Perl', author => 'Ken'},

+        {title => 'Good day', author => 'Tom'}

+    ]

+    my $query = $dbi->insert(table => 'book', param => $params->[0], query => 1);

-    my $query = $dbi->insert(table => 'book', param => $param, query => 1);

+戻り値はL<DBIx::Custom::Query>オブジェクトです。

+作成したクエリはC<execute()>で実行することができます。

-またC<create_query()>メソッドを使って任意のSQLのクエリを作成

+    foreach my $param (@$params) {

+        $dbi->execute($query, $param);

+    }

+

+ステートメントハンドルが再利用されるので、パフォーマンスが

+改善されます。

+C<query>オプションはC<insert()>, C<update()>, C<update_all()>,

+C<delete()>, C<delete_all()>で利用することができます.

+

+クエリを作成するメソッドに渡すパラメータと

+C<execute()>に渡すパラメータの個数は同じでなければならない

+ことに注意してください。

+

+C<create_query()>を使って任意のSQLのクエリを作成

 することもできます。

     my $query = $dbi->create_query(

         "insert into book {insert_param title author};";

     );

-戻り値はL<DBIx::Custom::Query>オブジェクトです。

-このオブジェクトはSQL文とパラメータバインド時の列名を

-保持しています。またステートメントハンドルも保持しています。

-

-    {

-        sql     => 'insert into book (title, author) values (?, ?);',

-        columns => ['title', 'author'],

-        sth     => $sth

-    }

-

-クエリオブジェクトを使って繰り返し実行するにはC<execute()>を使用します。

-    

-    my $params = [

-        {title => 'Perl',      author => 'Ken'},

-        {title => 'Good days', author => 'Mike'}

-    ];

-    

-    foreach my $param (@$paramss) {

-        $dbi->execute($query, table => 'book', param => $input);

-    }

-

-C<execute>メソッドの第一引数にクエリオブジェトを渡すことができます。

-C<insert()>メソッドよりも高速です。

-

-注意点がいくつかあります。それはパラメータの数は必ず同じでなくてはならない

-ということです。最初に3つのパラメータだけを渡したのに、次の実行では

-二つのパラメータを渡すと予期しない結果になります。それは

-動的に生成されたSQLに含まれるプレースホルダの数が異なるからです。

-またC<execute()>によっては自動的にはフィルタが有効にならないので、

-C<table>を指定する必要のあることに注意してください。

-本当に必要な場合だけ利用してください。

 =head2 9. その他の機能

 =head3 メソッドの登録

-メソッドを登録するにはC<method()>を使用します。

+D<DBIx::Custom>オブジェクトにメソッドを追加することができます。

+C<method()>を使用します。

     $dbi->method(

         update_or_insert => sub {

@@ -1146,15 +1155,16 @@ C<table>を指定する必要のあることに注意してください。

         }

     );

-<method()>で登録したメソッドは

-L<DBIx::Custom>オブジェクトから直接呼び出すことができます。

+これらのメソッドは

+L<DBIx::Custom>オブジェクトから呼び出すことができます。

     $dbi->update_or_insert;

     $dbi->find_or_create;

 =head3 結果クラスの変更

-必要ならば結果クラスを変更することができます。

+結果クラスを変更することができます。

+デフォルトはL<DBIx::Custom::Result>です。

     package MyResult;

     use base 'DBIx::Custom::Result';

@@ -1172,16 +1182,14 @@ L<DBIx::Custom>オブジェクトから直接呼び出すことができます

 =head3 キャッシング

-タグの展開後のSQLはパフォーマンスの理由のためにキャッシュされます。

+タグの解析後のSQLはパフォーマンスの理由のためにキャッシュされます。

 これはC<chace>で設定でき、デフォルトではキャッシュを行う設定です。

     $dbi->cache(1);

-キャッシュ方法はC<cache_method>にメソッドを指定することで

-変更することができます。

-データの保存と取得のためのメソッドを定義します。

-

-デフォルトでは次のようにメモリ上にキャッシュを行うものになっています。

+キャッシュ方法はC<cache_method>で変更することができます。

+デフォルトのメソッドは以下のようになっていて、

+メモリ上にキャッシュが保存されます。

     $dbi->cache_method(sub {

         sub {

@@ -1190,22 +1198,28 @@ L<DBIx::Custom>オブジェクトから直接呼び出すことができます

             $self->{_cached} ||= {};

             if (@_ > 1) {

-                # Set

+                # キャッシュの保存

                 $self->{_cached}{$_[0]} = $_[1] 

             }

             else {

-                # Get

+                # キャッシュの取得

                 return $self->{_cached}{$_[0]}

             }

         }

     });

 第一はL<DBIx::Custom>オブジェクトです。

-第二引数はタグの展開される前のSQLです。

-第三引数はタグの展開後のSQLです。

+第二引数はタグが解析される前のSQLです。

+第三引数はタグの解析後のSQLの情報です。これはハッシュのリファレンスです。

-自分で作成する場合は第三引数が存在した場合はキャッシュを設定し、

+第三引数が存在した場合はキャッシュを設定し、

 存在しなかった場合はキャッシュを取得する実装に

 してください。

+=head1 サンプル

+

+以下のWikiでサンプルを見ることができます。

+

+L<DBIx::Custom Wiki|https://github.com/yuki-kimoto/DBIx-Custom/wiki>

+

 =cut