フォームの入力を確認するData::FormValidatorとFormValidator::Simple : blog.nomadscafe.jp
フォームの入力を確認するData::FormValidatorとFormValidator::Simple フォームから送信されたデータのチェックをするモジュールはCPANに二つあります。Data::FormValidatorと加藤さんのFormValidator::Simpleがそれ。いままでガリガリと書いていた部分をこれを用いて楽ができないかと試し中。 メールアドレスとパスワードを入れるような以下の登録画面があって、 <form> メールアドレス:<input name="mail" type="text" id="mail" size="20" /><br /> パスワード:<input name="password" type="password" id="password" size="20" /><br /> もう一度パスワード:<input name="password_co
エラーはエラーと返すべき : blog.nomadscafe.jp
エラーはエラーと返すべき まとめると、実運用ではCGI::CarpのfatalsToBrowserを使わないという話。社内向け フツーのCGIで、 #!/usr/bin/perl use strict; use CGI::Carp qw(fatalsToBrowser);#fatalsToBrowserを利用 use CGI; my $q = CGI->new; die "Bad error here"; print $q->header; print "test"; というものを書いて、実行するともちろんdieをする。そして画面には以下のHTMLが出力される。 <h1>Software error:</h1> <pre>Bad error here at /var/www/html/test/carp_fatal.cgi line 9.</pre> <p> For help, pleas
Perl::Critic / UNIVERSAL::require - naoyaのはてなダイアリー
このところ社内の技術勉強会で取り上げているテーマの Perl::Critic。このモジュールは、Damian Conway の Perl Best Pracitice に書かれているスタンダードな Perl のコーディングスタイルをチェックするためのものです。Perl::Critic をインストールすると perlcritic というコマンドがインストールされ、それを使うことで自分が書いた Perl のソースをチェックしたりできるという。 いろんなコーディングスタイルのルールとかは、Perl::Critic::Policy のサブクラスに記述されていて、pod で全部読めます。 この Perl::Critic なポリシーの中に Perl::Critic::Policy::BuiltinFunctions::ProhibitStringyEval というのがあります。これは eval には文
Perl の MVC フレームワーク Catalyst のお勉強〜その１〜 :: Drk7jp
時間が空いているときに Catalyst のお勉強をしていたのですが、なかなか情報をまとめる時間がとれないのです・・・。思ったより苦戦したので少しずつでもお勉強の情報をまとめていこうと思ってます。今回はその１ってことで。Catalyst をこれからお勉強してみようって方の参考にでもなれば幸いです。 実際には、アプリケーションを１つ作ってみるってところまで既に２週間前に終わっていたりするのですが、その解説に至るまでどれくらい時間かかるんだろう・・・ (｡･ｘ･)ゝ Catalyst の基礎知識 Catalyst のフレームワークの構成は上図のような構成になっています。純粋な MVC ではなく、MV C + A(Apprication) のような構成になっていますが、Application の部分は Dispatcher 機能に相当する部分で、実装時には MVC の考え方で問題ありません。 M
Text::Hatena 2 - jkondoの日記
id:miyagawaさん、id:tociyukiさん反応有難うございます。 「例えば「id:jkondo」と書いた時にどこにリンクすればいいんだ」でコールバック関数というのはなるほどなあと思うんですが、そもそも「id:jkondo」という文字列は自動リンクする、という判定は誰がすべきなのだろう、テキストを全部関数に渡す？みたいな疑問を持っています。
Text::Hatena - jkondoの日記
先日、CPANにText::HatenaというPerlモジュールを作って登録しました。 http://search.cpan.org/~jkondo/Text-Hatena-0.02/lib/Text/Hatena.pm はてなダイアリーで使っているはてなの記法（*→見出し、>>→引用）に準じて、テキストからHTMLを生成するモジュールです。 本当はURLの自動リンクとか各種自動リンク記法なんかも一緒にできるようにしようと思っていたのですが、例えば「id:jkondo」と書いた時にどこにリンクすればいいんだ、みたいな問題がありますのでとりあえずブロック要素だけに対応しています。（インライン要素は別のモジュールでもいいかなという気がしています） はてなを毎日使っていると、「-」と書いてリストを生成する、みたいな癖がついてきて、いろんな所で使いたくなってきます。そういうときにこのモジュールを使
hori-uchi.com: bundleを作成してPerlモジュールのインストールを簡単に
perlにはCPANというとても便利で強力なサイトがあり、そこに登録されている膨大な数のPerlモジュールを利用することにより、面倒なプログラミングを簡単にできたりするんですが、Perlモジュールを多用しはじめると、そのインストールが結構面倒くさくなってきます。特に新たにサーバをたてて、システムを新規に構築するなんて時はモジュールのインストールだけでかなり時間がかかってしまうってことになりかねません。 そこでいつも使うようなモジュールをリストにまとめておき、一発でインストールできれば、非常に便利ですし時間も節約できます。CPANではBundleを使うことによりそのようなことを実現できます。 Bundleはそれ自体がPerlモジュールです。Bundleは以下の手順で作成します。 まずBundle::の名前空間を持つモジュールとして作成する =head1 CONTENTSというPODセクション
リファレンスの循環参照によるメモリリークを Scalar::Util::weaken で解決する - naoyaのはてなダイアリー
Perl のガベージコレクション(GC)の実装にはリファレンスカウント方式のGCが採用されています。リファレンスカウントというのは、あるデータ構造やオブジェクトがあった際、それらを参照するリファレンスの数を内部で換算して、その数が 0 になったらメモリから実体を破棄するという仕組みです。(JavaやRubyなどの他言語のGC方式については 'Perl、Java、Ruby における GC アルゴリズム' あたりを。) リファレンスカウント式GCは、仕組みがシンプルで分かりやすい利点を持つ反面、相互参照が原因で参照を切ることができずにオブジェクトが解放されず、結果メモリリークを引き起す場合があるという欠点も持っています。 このメモリリークはバッチスクリプトや CGI のように、一度の実行で Perl のプロセスそのものが終了するプログラムではあまり問題になりませんが、デーモンプログラム、あるい
PerlCEInstall - Walrus, Digit.
ファイルは、以下のディレクトリから取得できます。 http://www.rainer-keuchel.de/wince/dirlist.html 上のドキュメントに従い、以下のファイルを取得します。 celib-3.06-dll-bin-all-platforms.tar.gz (celib.dllの最新版) perl-wince-arm-pocket-wce300.tar.gz (Perl本体) perlide-wince-arm-pocket-wce300.tar.gz (Perl IDE : エディタ) また、cereg.exeが含まれている以下のアーカイブを取得します。 http://www.rainer-keuchel.de/wince/wince-desktop-tools.tar.gz WinCE200ではmsvcrt.dllが必要、との文言がありますが、WinCE200では
iandeth. - 日本語対応 文字組み→画像描画 Module 作ってみた - 初 CPAN Module 登録
初めて CPAN に module をアップしてみました。HOWTO についていろんなドキュメント読みつつ、週末嫁を寝かしつけた上でこっそりと module 用の pod ドキュメントを書きつつ... やっとこさ形になりました。これで気分はいっぱしの Perl 野郎（気分だけ？）。 http://search.cpan.org/~bashi/ 以下モジュールの簡単な概要です。詳細は CPAN 上のドキュメントを参照って事で。 名前 Imager::DTP - 画像に対して文字を描画するモジュール。マルチバイト文字対応で、さらにDTPアプリちっくなオプション機能付き。 概要 元は、情報誌制作システム系の業務案件にて ブラウザ入力した情報を、即座に、情報誌体裁に落とし込んだJPEG画像として同ブラウザ上で確認したい。 というニーズに対して Perl を用いて実現検討した結果できたものです。検討
Perlメモ/Windowsでのファイルパス - Walrus, Digit.
シフトJIS、バックスラッシュ区切りのWindowsでのファイルパスに関する話題。 しばしば文字化けの原因などとして話題になる「2バイト目にバックスラッシュ（\x5C）が含まれる文字がある」ことについて、ファイルパスの扱いでもトラブルの原因になることがあるようです。 例えば、「機能」というファイル/ディレクトリ名があるとすると、これは「能」という文字の2バイト目が\x5Cです。 いくつかのコマンドは、これをうまく処理できません。 Windows XP上のActive Perl 5.8.4（ビルド810）で実験しました。 以下は期待通りの動きをしなかった事項です。 「機能」があるディレクトリで、glob('./*')をしても、「機能」が返り値に含まれない 「機能」という文字列を変数$_に入れ、opendir(DIR, $_)としても「機能」ディレクトリを開けない 「機能」という文字列を変数$
Perl の Mixin / Catalyst のプラグインの仕組み - naoyaのはてなダイアリー
何とタイムリーな記事。まつもとさんが「仕様の継承」と「実装の継承」について語っているので勝手にまとめてみる。 まつもとさんがITProに書いた記事がきっかけになったのか、最近 Mixin に関する話題をよく目にする、気がします。 Perl は多重継承をサポートする一方で、Exporter を使った Mixin も可能です。この辺はmiyagawa さんのメールマガジンのバックナンバーに詳しく書いてあります。 Object-Oriented Programming with Perl Vol.29 - Exporter による Mixin Object-Oriented Programming with Perl Vol.30 - Exporter::Lite Exporter で関数を export しつつ、それを import した側で、関数ではなくインスタンスメソッドとしてそれを利用す
ちゃんとUTF-8 flagを処理する : 404 Blog Not Found
2005年09月30日14:33 カテゴリLightweight Languages ちゃんとUTF-8 flagを処理する ちょ、ちょっとまったぁ。 naoyaのはてなダイアリー - XML::Parser を Hack して utf8 フラグ問題から解放される ちゃんとやりたい方は、 Unicode::RecursiveDowngrade Object::Apply あたりを使いましょう。 これ、「ちゃんとした」方法って言われちゃうとなあ。 Perl 5 Portersのラフコンセンサスとしては、UTF-8 flagの処理のガイドラインは、 文字列としての処理はflagを付けて バイト列としての処理はflagを落として というもので、翻訳すると 内部で扱いはflag付き 外部に出す寸前でflag落とし ということになります。よって「いつflagを落とすか」は、「出力時」というのが望まし
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
http://www.lost-season.jp/mt/2005/10/200510182.html
はてなはてな技術発表会日記 - Catalyst 技術勉強会
http://antipop.gs/mt/2005/10/14/001702
http://www.lost-season.jp/mt/2005/10/200510090.html
Digest::Perl::MD5
2005-10-04
http://www.lost-season.jp/mt/2005/10/2005100221.html