Perl-DBIC/SELECT詳細/WHERE句でスカラサブクエリを使うの変更点

追加された行はこの色です。
削除された行はこの色です。
Perl-DBIC/SELECT詳細/WHERE句でスカラサブクエリを使うへ行く。
Perl-DBIC/SELECT詳細/WHERE句でスカラサブクエリを使うの差分を削除

* WHERE句でスカラサブクエリを使う [#yca66371]

 my $rs   = $self->schema->resultset('Category');
 my $subq = sprintf
   " = (SELECT parent_category_id FROM category WHERE category_id = %d)",
   $category_id;
 $rs = $rs->search( { parent_category_id => \$subq } );
 $rs = $rs->search_literal( 'category_id <> parent_category_id', { order_by => 'category_id' } );