結構悩み中です。なんか良いCPANモジュールあればいいのになぁ。 はじめに Perlモジュールを作っていると、どうしても環境依存な設定値ってのが必要なシーンがある。 例えばDBD::mysqlなんかだとテスト用のデータベースの所在だとか聞かれるけど、ああいう奴…

DataTime-Format-StrptimeのMakefile.PLこういうのイイ！w

追記 T.MURACHIさんのご指摘どおりシンボルリファレンスなので、 タイトル変えました。＾＾； 続き とあるソースを読んでたらこんなん出てきた。 my $tmp = "main::foo"; $tmp->{a} = "a";んむ、これどういう事なんだろうと思ったら、 $foo{a} = "a"; と同じ…

Devel::DProfを使うと簡単にプログラムの流れを把握出来ます。*1例えばinc::Module::Installの初期化処理ってどんなんだろうと思ったら、 $ perl -d:DProf -Minc::Module::Install -e 'use inc::Module::Install'ってやるとそのディレクトリにtmon.outってフ…

んー、これバカっぽぃネタですけども。 Perlメモ Math::Round ちょっとカスタムでサブルーチンを定義するのもなんかこそばゆい。 従って後者の場合。 Math::Round::nearestを使う場合 小数点第2位を四捨五入して小数点第1位まで丸めたい場合、Math::Roundを…

はじめに MySQLの関数にAES_ENCRYPT, AES_DECRYPTってのがあります。AES_ENCRYPT, AES_DECRYPTRijndaelを128bitのkeylengthでECBで暗号化する関数です。 AES_ENCRYPT mysql> SELECT HEX(AES_ENCRYPT('hogehoge', 'abcdeabcdeabcdea')) AS encrypted; +------…

はじめに とりあえず僕の環境であるFC6で試してます。 Install SpiderMonkey checkout まずは適当なディレクトリに行ってcvsからcheckoutしてきましょう。 # cvs -d :pserver:anonymous@cvs-mirror.mozilla.org:/cvsroot login # cvs -d :pserver:anonymous@…

世の中binary2.0なムードが高まっていますが、 今日会社のLinux masterな方に聞いた手法。 あと自分で少し工夫してみたです。sano++ rpmコマンド rpm -qa query allなので全てのパッケージを表示します。 rpm -ql [package name] packageに含まれるファイル…

d:id:higepon:20060707:1152249345 によるとjavascript.elがいい感じとの事でしたが、今確かめてみたら404ですた。orz... Web Archiveにてまだ拾えます。javascript.el設定は、 ;; javascript-mode (add-to-list 'auto-mode-alist (cons "\\.\\(js\\|as\\|js…

前から存在と用途は知ってたんだけど、tpageコマンドが非常に(°д°)ｳﾏｰ テンプレートを作っとく $cat foo.tt2 [% name %] is [% something %] tpageでドーン $ tpage --define name=foo --define something=bar foo.tt2 foo is bar色々と応用利きそうですね。

はじめに DBIx::Class::ResultSetManagerを使うとTableクラスの中のメソッドとして、ResultSetの拡張を記述する事が出来ます。*1ちなみにまだ実験段階のモジュールのようです。 あしからず。以下ドキュメントのSYNOPSYSをそのまま。 # in a table class __PA…

はじめに d:id:ZIGOROu:20061105:1162736838の続き的な内容です。 Log::Log4perlのドキュメント Log::Log4perlの設定ファイルでの変数代入 Log::Log4perlの設定ファイルでPerlでhookを書く と思いっきり書いてあります。 Perlでのhookの制約 但し制約があり…

はじめに Catalyst::Plugin::ConfigLoaderを使うと異なる環境の為の設定を環境変数のみで制御出来ます。 下準備 ちょっと癖物なのが下記のように設定しなきゃいけないって事です。 package MyApp; use Catalyst qw/ConfigLoader/; __PACKAGE__->config( file…

始めに Catalyst::Logを敢えてLog::Log4perlに変えるケースって良くあるとは思うんですが、デフォルトだとstderrへの書き込みのようなので、起動のさせ方に依っては嬉しくない記載になる可能性が高いです。*1と言う訳できちんと外部のファイルに明示的に出力…

はじめに 前回のエントリはこちら。d:id:ZIGOROu:20061007:1160169000今回はComponentだけにフォーカスを当てます。 Componentとは何か 基本的にmyapp_create.plで作成するモジュールはComponentです。 ここで作られるComponentはCatalyst::Controller, Cata…