iandeth. - 日本語対応 文字組み→画像描画 Module 作ってみた - 初 CPAN Module 登録
初めて CPAN に module をアップしてみました。HOWTO についていろんなドキュメント読みつつ、週末嫁を寝かしつけた上でこっそりと module 用の pod ドキュメントを書きつつ... やっとこさ形になりました。これで気分はいっぱしの Perl 野郎（気分だけ？）。 http://search.cpan.org/~bashi/ 以下モジュールの簡単な概要です。詳細は CPAN 上のドキュメントを参照って事で。 名前 Imager::DTP - 画像に対して文字を描画するモジュール。マルチバイト文字対応で、さらにDTPアプリちっくなオプション機能付き。 概要 元は、情報誌制作システム系の業務案件にて ブラウザ入力した情報を、即座に、情報誌体裁に落とし込んだJPEG画像として同ブラウザ上で確認したい。 というニーズに対して Perl を用いて実現検討した結果できたものです。検討
perlvar - Perl predefined variables - Perldoc Browser
CONTENTS NAME DESCRIPTION The Syntax of Variable Names SPECIAL VARIABLES General Variables Variables related to regular expressions Scoping Rules of Regex Variables Performance issues Variables related to filehandles Variables related to formats Error Variables Variables related to the interpreter state Deprecated and removed variables #NAME perlvar - Perl predefined variables #DESCRIPTION #The Sy
tutorialog Blog Archive Catalyst - 簡単なアプリケーションの開発
Catalyst - 簡単なアプリケーションの開発 April 30, 2006 Posted by butcher in : Perl , trackback PerlのMVCフレームワークCatalystについて紹介します。 Catalystについてはこちらを参照ください。 今回は、インストールから、簡単なDBアプリケーションの開発、mod_perl上での実行の手順を紹介します。 開発環境は、FedoraCore4, perl v5.8.6, Apache 2.0.55, mod_perl 2.0.2, mysq l 4.1.18 です。 まずはインストール。 インストールは非常に簡単で、”Task::Catalyst”モジュールを入れるだけです。(依存関係のある他のモジュールもインストールされます。) $ perl -MCPAN -e 'install Task::Cat
FormValidator::Simple
NAME FormValidator::Simple - validation with simple chains of constraints SYNOPSIS my $query = CGI->new; $query->param( param1 => 'ABCD' ); $query->param( param2 => 12345 ); $query->param( mail1 => 'lyo.kato@gmail.com' ); $query->param( mail2 => 'lyo.kato@gmail.com' ); $query->param( year => 2005 ); $query->param( month => 11 ); $query->param( day => 27 ); my $result = FormValidator::Simple->check
141 WebLog: Net::Amazon
思ったこと、考えたこと、プログラミング、WEB、画像処理、ケータイについて、つらつらと書いてます。いわゆる日記かな。 # Net::Amazon 実用的なもので遊んでみようと言う訳で、 Net::Amazon をつかってみた。 #!/usr/bin/perl use Strict; use Net::Amazon; use Encode; my $ua = Net::Amazon->new( token => 'tokenID', locale => 'jp', ); my $keyword = '中島美嘉'; Encode::from_to($keyword, 'euc-jp','utf8'); my $response = $ua->search(keyword => $keyword, mode => 'music'); if($response->is_success()) { p
当方perl初心者です。 今回CGI::Application::DispachでWEBアプリケーションを作成しようと思って 以下のHPの通りにプログラムを作成をしたのですが、エラーが発…
当方perl初心者です。 今回CGI::Application::DispachでWEBアプリケーションを作成しようと思って 以下のHPの通りにプログラムを作成をしたのですが、エラーが発生して実行できません。。。(404エラー) *サンプルプログラムのlibのパスだけ"./lib"と変更しております。 http://www.itmedia.co.jp/enterprise/articles/0703/29/news014.html Apacheのログは以下です。 [Tue May 06 16:19:26 2008] [error] [client 192.168.x.x] Passing extra args ('DEFAULT') to dispatch() is deprecated! Please use 'args_to_new' at ~/app.cgi line 7 [Tue
PATH_INFOと相対パス（リンク） : blog.nomadscafe.jp
PATH_INFOと相対パス（リンク） おまえのブログさんのエントリーCGI::Application::Dispatch勉強中その２で でも、CGI::Application::Dispatchを使う場合は、PATH_INFO形式を利用することが前提なうえ、URIが全部、 http://example.com/dispatch.cgi/モジュール名/Runモード な感じになります。階層が全部一緒です。こうなると、今までの「URIの階層=ファイルのありか」という方法でテンプレートを並べて、リンクURIを相対パスで書く、というのが不便になりました。URIたびたび間違うし…。 これは僕も悩みました。あとでPATHが変更になりそうなときには絶対パス・リンクは使いづらいですし、Dreamweaverでも作成しにくい。なので最近作ったCGI::Application::Dispatchを利用したアプ
最終回 Webアプリケーション開発にチャレンジ【後編】
WWW::OpenSearchを使った検索Webアプリケーション 前回は、「Webアプリケーションを作るための仕組み」は、フレームワークとしてCGI::Applicationが用意されていることを解説し、その使い方も紹介しました。前回までの内容を踏まえて、目的のWebアプリケーションは次のような仕様にしました。 検索語句を指定して検索 検索エンジンを一覧から選んで検索できる まずは、リスト1のようにCGI本体を記述します。これをapp.cgiとしましょう。app.cgiではCGI::Application::Dispatchを使うので、リスト中の1の部分のようにして自作クラスを置くライブラリディレクトリを指定しておきます。 #!/usr/local/bin/perl use strict; use lib qw (/path/to/lib); ←1 use CGI:
CGI::Ex::Fillなんてのがあったのか - Unknown::Programming
昨日の記事の続き 2008年02月16日 tomyhero tomyhero CGI::Ex::Fill のべんちとか性能はどうなのかと思った id:tomyheroさんからの情報でCGI::Ex::Fillっていう、Liteと同じく正規表現ベースでFillInFormしてくれるものが既に存在していたのを知った。 ってことでCGI::Ex::Fillも交えて再度ベンチをとってみた。 コードは以下 use Benchmark qw(cmpthese timethese :hireswallclock); use CGI::Ex::Fill (); use HTML::FillInForm; use HTML::FillInForm::Lite; my $str = q{ <form> <input type="text" name="text_data1" value="" > <input
Perl Tips | Perl で、CGI::Application を使う
CGI::Application は HTML::Template を統合している。以下は HTML::Template のドキュメントで書かれている例が含まれている。 使用するモジュール use CGI::Application; # 要 HTML::Template # IPC::SharedCache (こちらは任意) まずは以下のようなディレクトリとファイル構成にする。 ./cgi-bin/lib/App.pm ./cgi-bin/templates/test.templ ./cgi-bin/index.cgi index.cgi の内容: 基本的に App クラスを new して app->run() としているだけである。 BEGIN ブロックのそれはライブラリへのパスを探している。 #!/usr/bin/perl -w use strict; my $LIB_DIR; BEG
CGI::Applicationを使ったアンケートプログラムの習作
はじめに PerlのWEBアプリケーションフレームワークとして、CGI::Applicationというものがある。 これを使った簡単なアンケートプログラムを紹介する。 プログラムの内容 最初の入力画面で名前などを入力し、確認画面を経て、登録完了画面でデータを登録する。 間違った入力をした場合、確認画面には進まず、入力画面に強制に戻る。 入力画面 （XXXを入力してください） 確認画面 （内容を確認してください） 登録完了画面 （登録完了しました） ファイル構成 index.cgi コントローラー（すべてのユーザリクエストを受ける） config.cfg 設定ファイル tmpl HTMLテンプレートファイルの置き場 input.tmpl 入力画面のHTMLテンプレートファイル check.tmpl 確認画面のHTMLテンプレートファイル finish.tmpl 登録完了画面のHTMLテン
CGI::ApplicationでもCatalyst風にStash : blog.nomadscafe.jp
CGI::ApplicationでもCatalyst風にStash CGI::AppでTropyを作る過程で思いついたプラグイン。 CGI::AppでもCatalystでも同じ感じでアプリが組めたら便利かなと思う。 package CGI::Application::Plugin::Stash; use strict; use warnings; use vars qw($VERSION @EXPORT); require Exporter; @EXPORT = qw(stash); $VERSION = '0.01'; sub import { goto &Exporter::import } sub stash{ my $self = shift; # First use? Create new __PARAMS! $self->{__PARAMS} = {} unless (exis
CGI::Application stash->{template}でテンプレートを指定 : blog.nomadscafe.jp
CGI::Application stash->{template}でテンプレートを指定 CGI::ApplicationでもCatalyst風にStashエントリーのはてなブックマークでハテナオヤさんに TT Plugin と組み合わせて stash->{template} にテンプレートをセットして出力されるようにしてもいいかもですね。 とのコメントもらったので反応。 たぶん、CGI::Application::Plugin::TTのTEMPLATE_NAME_GENERATORでできる。 sub setup{ my $self = shift; $self->tt_config( TEMPLATE_NAME_GENERATOR=>sub{shift->stash->{template} || ""} ); } sub do_index{ my $self = shift; $self
FormValidator::Simpleにエラーメッセージ機能がついた。 : blog.nomadscafe.jp
FormValidator::Simpleにエラーメッセージ機能がついた。 FormValidator::Simpleがバージョン0.10でMESSAGE HANDLING機能が追加されたのでさっそく試してみた。 想定するフォームは、以前試した時と同じ <form> メールアドレス:<input name="mail" type="text" id="mail" size="20" /><br /> パスワード:<input name="password" type="password" id="password" size="20" /><br /> もう一度パスワード:<input name="password_confirmation" type="password" id="password_confirmation" size="20" /><br /> パスワードは半角英数字5
CGI::App::Plugin::Stashの使いどころ。 : blog.nomadscafe.jp
CGI::App::Plugin::Stashの使いどころ。 ひさびさにCGI::App。この間（英語で）質問メールが来たり、id:nekokakのコードをふまえて、 CGI::Application::Plugin::Stashをば。 $cgiapp->param('foo','bar'); が、 $cgiapp->stash->{foo} = 'bar'; と書ける"alternative for param()"な訳なんですが、 これが何が嬉しいかというと。 $cgiapp->param( 'foo', MyApp::DB->resultset('table')->search() ); を $cgiapp->stash->{foo} = MyApp::DB->resultset('table')->search(); と、（すこし）エレガントに（当社比）書けるところ。右辺が複雑であ
File::Backup - 簡単なファイルのバックアップ & ローテーションの自動化 - perldoc.jp
名前¶ File::Backup - 簡単なファイルのバックアップ & ローテーションの自動化 概要¶ use File::Backup; backup( from => '/source/path/to/backup/from', to => '/destination/path/to/backup/to', keep => 5, timeformat => 'YYMMDD_hhmmss', ); 説明¶ このモジュールは自動的に元のファイルをロックをおこなう、 記録と圧縮(いわゆる"バックアップ")計画を実装します。 * 現在のところ、これはUnixパス文字列でのtarとgzipだけです。おそらく あなたのコンピュータでは、これで大丈夫でしょう...。クロス・プラットフォームの ファイルのバックアップはもうすぐ実装される予定です。 この新しいバージョンでの、本当に素晴らしい特徴は、ta
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
DBD::PgPP
mime_pls ver.2.02 document
今日のCPANモジュール（跡地） 目次
Apacheの環境変数を使ってPerlのライブラリパスを追加 : blog.nomadscafe.jp