This domain may be for sale!
以前書いたエントリの修正です。 get_columnsだとinflateを通らないようなので、明示的にアクセサを呼ぶように修正しました。使い方には変更ありません。 sub inflate_row { my $row = shift; my %data; foreach my $column ( $row->result_source->columns ) { $data{$column} = $row->$column; } return \%data; } sub inflate_resultset { my $rs = shift; return [ map { inflate_row($_) } $rs->all ]; } sub inflate_dbic { my ( $c, $obj ) = @_; if ( !Scalar::Util::blessed($obj) ) { re
ググっても意外と情報が出てこないmany_to_manyを試してみた。DBはMySQLで。 ■ DB作成 DBはこんな感じで作る。 create table users ( id int not null auto_increment primary key, name varchar(255) not null unique ) engine=innodb; create table roles ( id int not null auto_increment primary key, name varchar(255) not null unique ) engine=innodb; create table user_roles ( id int not null auto_increment primary key, user int not null, role int not
#前に社内wikiに書いておいたのを公開してみるテスト。 Catalystでマルチバイトを扱う機会があるのは主に ユーザーがフォームで入力する値 ($c->req->param()) データベースからの入出力 (DBIx::Class) それ以外の文字列の評価 View::TTによる出力の生成 FillInFormによるフォームの埋め込み HTTPレスポンス です。 ここでは以下の条件でまとめてみました。 文字コードはUTF8に統一 データベースにはmysqlを使用 下準備 テンプレート、perlのコードは全てUTF8で書きます。 mysqlの文字コードの指定は/etc/my.cnfに [mysqld] default-character-set = utf8 skip-character-set-client-handshake [mysql] default-character-set
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
処理を実行中です
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く