Data::ObjectDriver::SQL
NAME Data::ObjectDriver::SQL - an SQL statement SYNOPSIS my $sql = Data::ObjectDriver::SQL->new(); $sql->select([ 'id', 'name', 'bucket_id', 'note_id' ]); $sql->from([ 'foo' ]); $sql->add_where('name', 'fred'); $sql->add_where('bucket_id', { op => '!=', value => 47 }); $sql->add_where('note_id', \'IS NULL'); $sql->limit(1); my $sth = $dbh->prepare($sql->as_sql); $sth->execute(@{ $sql->{bind} }); m
DBI
NAME DBI - Database independent interface for Perl SYNOPSIS use DBI; @driver_names = DBI->available_drivers; %drivers = DBI->installed_drivers; @data_sources = DBI->data_sources($driver_name, \%attr); $dbh = DBI->connect($data_source, $username, $auth, \%attr); $rv = $dbh->do($statement); $rv = $dbh->do($statement, \%attr); $rv = $dbh->do($statement, \%attr, @bind_values); $ary_ref = $dbh->selecta
DBIx::DataModel
NAME DBIx::DataModel - UML-based Object-Relational Mapping (ORM) framework INTRODUCTION DBIx::DataModel is a framework for building Perl abstractions (classes, objects and methods) that interact with relational database management systems (RDBMS). Working above the DBI module, it provides facilities for generating SQL queries, joining tables automatically, navigating through the results, convertin
TheSchwartz::Simple
NAME TheSchwartz::Simple - Lightweight TheSchwartz job dispatcher using plain DBI SYNOPSIS use DBI; use TheSchwartz::Simple; my $dbh = DBI->connect(...); my $client = TheSchwartz::Simple->new([ $dbh ]); $client->prefix("theschwartz_"); # optional my $job_id = $client->insert('funcname', $arg); my $job = TheSchwartz::Simple::Job->new; $job->funcname("WorkerName"); $job->arg({ foo => "bar" }); $job-
hide-k.net#blog: Catalyst::Model::DBIC::Schemaを使ってみた
Catalyst::Model::DBIC::Schemaを使ってみました。 DBIx::Classで新しくなったSchemaモデルをCatalystのModelとして使うクラスなのですが、今までのModelと大きく違うのはモデルをアプリケーションの外に追い出すことが出来る点です。 例えば、複数のアプリケーションで認証情報を使いまわしたい時には便利かと思われます。 まずはスキーマを作ります。(Perl/DBIC - Nekokak's core dumpに大変わかりやすい説明があります。) Schema/ Account.pm Account/ Users.pm Schema/Account.pm package Schema::Account; use strict; use warnings; use base 'DBIx::Class::Schema'; __PACKAGE__-
101号室: [DBIx::Class][DBIC][perl] DBIx::Classで集約関数を使う
DBIx::Classでの集約関数(sum,avg,max,min,count,...)の使い方 searchの第二引数のハッシュリファレンスに、selectとasを指定する。 selectには集約関数とその引数(普通の列が欲しければその名前も)、asにはそれにつける名前を指定。結果はget_column('名前')で得る。 (Schemaのadd_columnsで指定されてる名前ならget_columnは必要ない。) $resultset->search({ #where句の条件 }, { select => [ "列名", # nameという列が欲しければ "me.name" { 関数名 => '引数' }, # count(me.id)なら、 { count => 'me.id' } ], as => [qw/名前1 名前2/] # 例えばqw/ name count /, #必要な
Class::DBI::Sweet
NAME Class::DBI::Sweet - Making sweet things sweeter SYNOPSIS package MyApp::DBI; use base 'Class::DBI::Sweet'; MyApp::DBI->connection('dbi:driver:dbname', 'username', 'password'); package MyApp::Article; use base 'MyApp::DBI'; use DateTime; __PACKAGE__->table('article'); __PACKAGE__->columns( Primary => qw[ id ] ); __PACKAGE__->columns( Essential => qw[ title created_on created_by ] ); __PACKAGE_
Class::DBI
NAME Class::DBI - Simple Database Abstraction SYNOPSIS package Music::DBI; use base 'Class::DBI'; Music::DBI->connection('dbi:mysql:dbname', 'username', 'password'); package Music::Artist; use base 'Music::DBI'; Music::Artist->table('artist'); Music::Artist->columns(All => qw/artistid name/); Music::Artist->has_many(cds => 'Music::CD'); package Music::CD; use base 'Music::DBI'; Music::CD->table('c
CDBIでset namesする (Re::Monologue)
今更DBICでなくCDBIネタ。事情によりmy.cnfを書き換える事ができないのでset names utf8しようとしたらやり方が判らず、しばらくいらいらしたのでメモ。 環境はMySQL 5.0.18 + Class::DBI 3.000014 package MyApp::Model::CDBI; use strict; use base qw[ Catalyst::Model::CDBI Class::DBI::mysql ]; __PACKAGE__->config( dsn => 'DBI:mysql:dbname=データベース名', user => 'データベースユーザ', password => 'データベースパスワード', options => {}, relationships => 1 ); 1; package MyApp::Model::CDBI::Users; u
Catalyst の Catalyst::Helper::Model::CDBI でいつもハマる・・・orz
何か、Catalyst をいろんな環境にインストールするたびに、Helper スクリプトを実行して、create model CDBI するといつも同じエラーで躓くので備忘録として記事にしておこうと思いました。 その１）Class::DBI::mysql をインストールし忘れる perl myapp_create.pl model CDBI CDBI dbi:mysql:WebService testid testpw exists "/home/apache/tmp/MyAPP/script/../lib/MyAPP/Model" exists "/home/apache/tmp/MyAPP/script/../t" created "/home/apache/tmp/MyAPP/script/../lib/MyAPP/Model/CDBI.pm" Couldn't require lo
Perl/DBIC - Nekokak's core dump
VERSION-0.05000での記述。http://search.cpan.org/~mstrout/DBIx-Class/ ドキュメントも当初に比べれば増えてきたし、そっち見たほうがよかばい。 まあ以下は簡単なまとめで。一通り使えるくらいは書きたい。 このサイトはWikiなので途中途中に色々追加したり修正したりしますからご注意を DBIx::Class::Schemaを使ってみる これからDBICではSchemaメインらしい。 使うテーブル作成SQL create table user ( id int(10) NOT NULL auto_increment, name varchar(256) NOT NULL, PRIMARY KEY (id) ) ENGINE = InnoDB;
Class::DBI::Sweet - 素敵なものをより素敵にする - perldoc.jp
Class::DBI::Sweet - 素敵なものをより素敵にする 概要¶ package MyApp::DBI; use base 'Class::DBI::Sweet'; MyApp::DBI->connection('dbi:driver:dbname', 'username', 'password'); package MyApp::Article; use base 'MyApp::DBI'; use DateTime; __PACKAGE__->table('article'); __PACKAGE__->columns( Primary => qw[ id ] ); __PACKAGE__->columns( Essential => qw[ title created_on created_by ] ); __PACKAGE__->has_a( created_on =>
Class::DBI - シンプルなデータベース抽象クラス - perldoc.jp
名前¶ Class::DBI - シンプルなデータベース抽象クラス 概要¶ package Music::DBI; use base 'Class::DBI'; Music::DBI->connection('dbi:mysql:dbname', 'username', 'password'); package Music::Artist; use base 'Music::DBI'; Music::Artist->table('artist'); Music::Artist->columns(All => qw/artistid name/); Music::Artist->has_many(cds => 'Music::CD'); package Music::CD; use base 'Music::DBI'; Music::CD->table('cd'); Music::CD->c
制御構文 - 2部 Perl言語仕様 - [SMART]
条件文 条件文はいくつかの選択肢をコード内で実現したい際に使用します。「もし～ならば、・・・を実行する」、「もし～ならば、・・・を実行しない」といったように条件によって処理を実行したり、いくつかの選択肢の中からひとつの処理を実行したりといったことを実現することができます。 if文 「もし～ならば、・・・を実行する」という条件つきの命令を実現するために、if 文が用意されています。if文は、カッコの中の条件式を評価し、TRUE のときだけ if ブロックの命令文を実行します。 if ( 条件式 ) { 処理.... } 変数 $var の値が A の時だけ出力するには次のようになります。 if ( $var eq 'A' ) { print "Aです\n"; } 条件式は複数あってもかまいません。複数の条件を並べたいときは、論理演算子の and もしくは or を使います。 # or: $v
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
nekobara カルゴルニア・ジョン: 7月4日の行動
DBIC DBIx で、SQL関数を使う - Solitaire
http://www.removabletype.net/pods/DBIx/Class/Manual/FAQ.html
http://www.lost-season.jp/mt/2005/11/2005112322.html
のみまくし日記 - Class::DBI update
perl DBD::Pgのインストールについて - 教えて！goo