hide-k.net#blog: Catalyst::Model::Adaptorを使ってみた
Catalyst::Model::Adaptor - use a plain class as a Catalyst model 要はどんなクラスでもCatalystのモデルにしてくれるクラスです。 たとえばこんなクラスを作って lib/MyApp/DateTime.pm package MyApp::DateTime; use strict; use warnings; use base qw/DateTime/; use DateTime::Format::W3CDTF; sub now { my ($class, $args) = @_; $args->{time_zone} = 'local' unless $args->{time_zone}; return $class->SUPER::now(%$args); } sub parse { my ( $class, $str )
Catalyst::Model::AdaptorがGJ - D-6 [相変わらず根無し]
Catalyst::Model::AdaptorがGJ Catalyst::Model::Adaptorがリリースされていたので早速使ってみた。 それまでもなるたけ全てのロジックをモデルにいれようとしてたんだけど、モデル自体がCatalystにべったりで嫌な感じだったのでどうやって分けようかと考えてきた。例えばCatalystに載せたくない（メモリを食う割に、別に非同期でバッチ処理すればいいものとか）もmodelにしか生き場所がないのにCatalystから分離できないという妙な状態だったりした。 そこでCatalyst::Model::Adaptorです。Minicoの現在の開発版ツリーはそんなところからAdaptorで実装をリファクタリングしてみた。 多分ケースバイケースなんだろうけど、俺の場合は以下の数点を考慮しながらやったらいい感じになってきましたよ： Minico::Busines
たけまる / Catalyst Internals - その他のコンポーネント
_ Catalyst Internals - その他のコンポーネント [perl][catalyst] その他とは，Action, Request などです． 今回は，コンポーネントの内部には立ち入らずに，デフォルトコンポーネ ントを変更する方法のみ紹介します． Action オブジェクトを変更するには，:ActionClass attribute を使いま す．これは，Catalyst::Action::RenderView を呼ぶときに使われている 方法です． sub foo :ActionClass('Foo') { ... } このようにすると，Catalyst::Action::Foo が呼ばれます．厳密には， sub dispatch に続いて，sub execute が呼ばれます． Catalyst::Action::REST では，dispatch を override し
Catalyst＋FastCGIで「MySQL server has gone away」→mysql_auto_reconnect[DBIC] - ヒルズで働く@robarioの技ログ
[error] DBIx::Class::ResultSet::pager(): DBI Exception: DBD::mysql::st execute failed: MySQL server has gone awayなんていうエラーが出てたのですが、 FastCGI(Catalystの方？）では$ENV{GATEWAY_INTERFACE}も$ENV{MOD_PERL}もないので、どうもmysql_auto_reconnectを自分でOnにしないとだめなようです。 とのことです。非常に助かります。 早速connect_infoの属性にmysql_auto_reconnectを加え、 Model::MyModel: schema_class: MySchema connect_info: - [dns, user, pass] - AutoCommit: 0 mysql_auto_
![Catalyst＋FastCGIで「MySQL server has gone away」→mysql_auto_reconnect[DBIC] - ヒルズで働く@robarioの技ログ](https://cdn-ak-scissors.b.st-hatena.com/image/square/55b02f3191010ee481e77948049b32747bdb7442/height=288;version=1;width=512/https%3A%2F%2Fogimage.blog.st-hatena.com%2F17680117127100682843%2F17680117127100696926%2F1556721973)
たけまる / Catalyst::Controller::Atompub リリース
リソースの削除 操作を実装するメソッドには "Atompub" という attribute を付与します． たとえば，List を実装するメソッドは，"sub xxx :Atompub(list)" のよ うになります． 余談ですが，DB Schema を決め打ちにしてしまえば，これらの操作すら実 装不要にできます．しかし，DB Schema はサービスの肝になるので，自由 度を持たせることにしました． リソース操作以外の処理は，Catalyst::Controller::Atompub が勝手に行 います．たとえば，Entry に app:edited 要素を追加したり，Slug header から URI を生成したり，適切な HTTP header を設定してくれます． それでは，まず Controller を作成します． $ ./script/myatom_create.pl co
ゆーすけべー日記
サキとは彼女の自宅近く、湘南台駅前のスーパーマーケットで待ち合わせをした。彼女は自転車で後から追いつくと言い、僕は大きなコインパーキングへ車を停めた。煙草を一本吸ってからスーパーマーケットへ向かうと、ひっきりなしに主婦的な女性かおばあちゃんが入り口を出たり入ったりしていた。時刻は午後5時になる。時計から目を上げると、待たせちゃったわねと大して悪びれてない様子でサキが手ぶらでやってきた。 お礼に料理を作るとはいえ、サキの家には食材が十分足りていないらしく、こうしてスーパーマーケットに寄ることになった。サキは野菜コーナーから精肉コーナーまで、まるで優秀なカーナビに導かれるように無駄なく点検していった。欲しい食材があると、2秒間程度それらを凝視し、一度手に取ったじゃがいもやら豚肉やらを迷うことなく僕が持っているカゴに放り込んだ。最後にアルコール飲料が冷やされている棚の前へ行くと、私が飲むからとチ
はてなグループの終了日を2020年1月31日(金)に決定しました - はてなの告知
はてなグループの終了日を2020年1月31日(金)に決定しました 以下のエントリの通り、今年末を目処にはてなグループを終了予定である旨をお知らせしておりました。 2019年末を目処に、はてなグループの提供を終了する予定です - はてなグループ日記 このたび、正式に終了日を決定いたしましたので、以下の通りご確認ください。 終了日: 2020年1月31日(金) エクスポート希望申請期限:2020年1月31日(金) 終了日以降は、はてなグループの閲覧および投稿は行えません。日記のエクスポートが必要な方は以下の記事にしたがって手続きをしてください。 はてなグループに投稿された日記データのエクスポートについて - はてなグループ日記 ご利用のみなさまにはご迷惑をおかけいたしますが、どうぞよろしくお願いいたします。 2020-06-25 追記 はてなグループ日記のエクスポートデータは2020年2月28
はてなグループの終了日を2020年1月31日(金)に決定しました - はてなの告知
はてなグループの終了日を2020年1月31日(金)に決定しました 以下のエントリの通り、今年末を目処にはてなグループを終了予定である旨をお知らせしておりました。 2019年末を目処に、はてなグループの提供を終了する予定です - はてなグループ日記 このたび、正式に終了日を決定いたしましたので、以下の通りご確認ください。 終了日: 2020年1月31日(金) エクスポート希望申請期限:2020年1月31日(金) 終了日以降は、はてなグループの閲覧および投稿は行えません。日記のエクスポートが必要な方は以下の記事にしたがって手続きをしてください。 はてなグループに投稿された日記データのエクスポートについて - はてなグループ日記 ご利用のみなさまにはご迷惑をおかけいたしますが、どうぞよろしくお願いいたします。 2020-06-25 追記 はてなグループ日記のエクスポートデータは2020年2月28
Journal of zzo (8086)
Zero Downtime / High Availability with Catalyst & FastCGI external servers Intro Here's the idea - you simultaneously run 2 FastCgiExternalServer's - a production one & a staging one. The staging one you muck around with to your heart's content. Start/stop/restart it - whatever - it won't effect your production environment. At some point you want to promote the staging stuff into production. And o
make_schema_atのオプションで，dump_overwriteがreally_erase_my_filesに変わってる - LAPISLAZULI HILL#diary
DBIx::Class::Schema::Loader::make_schema_at(): dump_overwrite is deprecated. Please read the DBIx::Class::Schema::Loader::Base documentation at ./script/myapp_update_schema.pl line 12 DBIx::Class::Schema::Loaderのmake_schema_atでエラーが出る．どうやら0.04002からdump_overwriteが廃止予定になっているようだ．すでに使えないけど．メッセージ通りDBIx::Class::Schema::Loader::Baseを見てみると，really_erase_my_filesというオプションが新設されているようです Catalystでscriptを使ってアップデート
携帯判定その他覚え書き - pepponの日記
携帯端末CIDR http://www.nttdocomo.co.jp/service/imode/make/content/ip/index.html http://www.au.kddi.com/ezfactory/tec/spec/ezsava_ip.html http://developers.softbankmobile.co.jp/dp/tech_svc/web/ip.php Catalyst::Plugin::MobileAgentでキャリア判定してからCIDRチェック チェックは割と時間かかる？とおもったけど、CatalystデバッグのTimeみてもたいしたこと無いのでbegin : Privateに仕込めそう 追記 http://search.cpan.org/~tokuhirom/Net-CIDR-MobileJP/ これは便利すな 端末IDとユーザID 信頼性は ユー
Plam（ぷらむ） - 明日なにやるの？ (plucore.log（プラコア ブログ）)
弊社では明日やる作業の内容を全員に送ってから帰宅するようにしています。 そこで僕はいつも Trac のチケットをコピペしてメールを書いていたんですが、これが面倒になってきたので以下のような簡単なアプリケーションを作りました。 ログイン Trac の My Ticket をリストアップして表示 選んで次へボタン 選んだ項目が入ったフォームを出力 登録してるユーザ全員にメール送信。内容を DB へ保存。 せっかくなので公開しようと思います。 （どうせならリポジトリを公開したいところですが、ちょっと準備不足なため、とりあえず tar.gz に固めておいておきます。） Plam-0.03.tar.gz Plam-0.04.tar.gz （バグを発見したため version 0.04 を公開します） Catalyst + TT + DBIx::Class で作ってます。 バックエンドには
Catalyst::Model::Net::Amazonでキャッシュ
昨日ちょっと気になったので触ってみた。 ヘルパーがあるので script/myapp_create.pl create model Net::Amazon Net::Amazon でモデル作成。yamlに Model::Net::Amazon: token: 'amazon_token' locale: 'jp' を設定して、Root.pmに sub default : Private { my ( $self, $c ) = @_; my $ua = $c->model('Net::Amazon'); my $response = $ua->search( asin => '4873112109' ); if ( $response->is_success ) { $c->response->body( $response->as_string ); } else { $c->respo
Catalyst::Plugin::StackTrace - Display a stack trace on the debug screen - metacpan.org
NAME Catalyst::Plugin::StackTrace - Display a stack trace on the debug screen SYNOPSIS use Catalyst qw/-Debug StackTrace/; DESCRIPTION This plugin will enhance the standard Catalyst debug screen by including a stack trace of your appliation up to the point where the error occurred. Each stack frame is displayed along with the package name, line number, file name, and code context surrounding the l
Devel::Bayside - コードカバレッジ
コードカバレッジというのは、ソースコードの何％が実行されたかという指標のことです。たとえば、以下のようなコードがあったら、 sub is_devide_100 { my $value = shift; if ($value % 100 == 0) { return 1; } else { return 0; } } &is_divide_100(1); と &is_divide_100(100); を呼ぶと、すべてのパスを通るので is_divide_100 のコードカバレッジは100%になります。 CPAN に Devel::Cover というモジュールがあります。このモジュールを使うと、Perl のコードカバレッジが計れます。Catalyst アプリでコードカバレッジを計るには、以下のようにします。 $ sudo cpan Devel::Cover $ cd myapp/script
nitsujiの日記 - CatalystでFormValidator::Simple::AutoでDBIC_UNIQUE使う場合
FormValidator::Simple::Plugin::DBIC::Unique - unique check for DBIC - metacpan.orgを見ると、Catalystの場合は # you also can pass resultset object. # in catalyst application, FormValidator::Simple->check( $q => [ name => [ ['DBIC_UNIQUE', $c->model('Schema::User'), 'username' ] ], ] ); と書いてある。 でもCatalyst::Plugin::FormValidator::Simple::Autoを使ってprofiles.ymlにバリデーションのルールを書く場合は$c->modelとか書けない。 admin/category/do
C::P::FV::S::Aを使ってる時にFV::S::P::DBIC::Uが使えない？件 - Unknown::Programming
タイトルは「Catalyst::Plugin::FormValidator::Simple::Autoを使ってる時にFormValidator::Simple::Plugin::DBIC::Uniqueが使えない？件」です。 長いので短くしてみました。 使えないというかどうやって使うのかがわからないというのが正解なんですが、FVS::Auto使って zip: - rule: [ 'NOT_DBIC_UNIQUE' , 'MyApp::Model::DBIC::Zipcode' , 'zip'] message: 存在しない郵便番号です みたいに書いてもFVS::P::DBIC::Uniqueエラーになっちゃいます。 Catalystが内部で保持しているmodel(ResultSet)オブジェクトを利用したいのですが現状のままじゃ無理ぽい？ myapp.yamlでパスに変換してくれる特殊構文
Catalyst::Manual::Cookbook::Deployment - libnitsuji.so
Cookbook長いので分割。 デプロイについてのレシピ。Webサーバーエンジンとアプリケーションの効率化も含む。 http://search.cpan.org/~jrockway/Catalyst-Manual-5.700701/lib/Catalyst/Manual/Cookbook.pod#Deployment mod_perl Deployment mod_perlは多くのアプリケーションに対しての最適解だけど利点と欠点を述べる。他の方法としてはFastCGIがある。 Pros Speed mod_perlはとても高速で、それぞれのApacheプロセスのメモリにアプリケーションをロードすることによって恩恵を受けられる。 Shared memory for multiple apps 同じサーバーで複数のCatalystアプリケーションをする必要がある場合、mo_perlは共通のモジ
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
CodeRepos::Share – Trac
ccc