script/stat_create.pl model DB DBIC::Schema DB::Schema create=static dbi:Pg:dbname=stat '' '' '{AutoCommit => 0}'

##</code><code>##

  |-- lib
  |   |-- DB
  |   |   |-- Schema
  |   |   |   |-- Class1.pm
  |   |   |   |-- Class2.pm
  |   |   |   |-- ...
  |   |   |   `-- ClassN.pm
  |   |   `-- Schema.pm

##</code><code>##

package DB::Schema::Add;

use strict;
use warnings;

use base 'DBIx::Class::Core';

__PACKAGE__->table("NONE");
__PACKAGE__->add_columns(qw/number/);
__PACKAGE__->result_source_instance
  ->name(\'(select 10*10 as number)');

1;

##</code><code>##

  my ($res) = $c->model('Add')->all;
  my $number = $res->number;

##</code><code>##

package DB::Schema::Add;

use strict;
use warnings;

use base 'DBIx::Class::Core';

__PACKAGE__->table("NONE");
__PACKAGE__->add_columns(qw/number/);
__PACKAGE__->result_source_instance
  ->name(\'(select ?::integer * ?::integer as number)');

1;

##</code><code>##

  my ($res) = $c->model('Add')->search({}, {bind => [5, 7]});
  my $body = $res->number;