2006

しょーこりもなくカバン

しょーこりもなくカバン # もともとカバンスキーなわけだが、また買ってしまったよ。チャリンコ乗り始めて以来、手持ちのカバンでは満たせない要求が多いのだ（言い訳）。ここ一年くらいの購入履歴を見ると。。。 ...

Test::WWW::Mechanize # まぁ、だまされたと思って使ってみるがよろし。つうか、今さらですねごめんなさい。 t/01-dummy.t use Test::More 'no_plan'; BEGIN { use_ok('Test::WWW::Mechanize') or exit; } my $mech = Test::WWW::Mechanize->new(); my $page = 'http://haro.jp/path/to/app.cgi'; $mech->get_ok($page,'GET app.cgi'); $mech->title_is('PageTitle', 'app.cgi title is PageTitle'); で、 prove -v t/01-dummy.t とかする。結構依存関係あるが、インストールは何回もするわけじゃないし。

CGI::Application で、REQUEST_METHOD で dispatch したい

CGI::Application で、REQUEST_METHOD で dispatch したい # 今日は今さらなネタばかりなんだが、最近 REST が気になる。で、CGI::Application で、REQUEST_METHOD に応じて AutoDispatch して欲しいのだが、 CGI::Application::Dispatch にはそういう機能はないっぽい。 ...

CGI::Application::Plugin::DispatchRequestMethod 作ってみた

CGI::Application::Plugin::DispatchRequestMethod 作ってみた # 昨日の続き。 CGI::Application::Plugin::AutoRunmode 、CGI::Application::Plugin::ActionDispatch を参考に書いてみた。他にもいろいろ参考にしてるので、コピペ祭りの様相 package CGI::Application::Plugin::DispatchRequestMethod; use strict; use warnings; use base qw(Exporter); use Class::Inspector; sub import { my $caller = scalar(caller); $caller->add_callback('prerun', ?&_prerun_callback_test); goto &Exporter::import; } sub _prerun_callback_test { my $self = shift; my $class = ref $self || $self; # initialize runmode my %runmodes = $self->run_modes(); my $request_method = uc($self->query->request_method); for my $method_name ( map {${$_}[2]} @{Class::Inspector->methods($class, 'expanded','public') || [[]]} ) { next if exists $runmodes{$method_name}; if ( ( $method_name =~ /^post_dispatch_(?w+)$/ and $request_method eq 'POST' ) or ( $method_name =~ /^put_dispatch_(?w+)$/ and $request_method eq 'PUT' ) or ( $method_name =~ /^delete_dispatch_(?w+)$/ and $request_method eq 'DELETE' ) or ( $method_name =~ /^get_dispatch_(?w+)$/ ) ) { $self->run_modes( $1, $method_name); } } } 1; 使い方は大体こんな感じ。 ...

空港の正面から飛行機を愛でる

空港の正面から飛行機を愛でる # 別に飛行機好きじゃないけど、行くまでは気持ちいい。あまりの暑さにとっとと退散したけど。 Google マップで全体を。（「ブラパチ日記/2006-7-16 」と同じような道のりなので、こっちの地図は削除） ...

萩多遊その後

萩多遊その後 # 去年の今頃気にしていた萩多遊の続報。 http://www.fukkan.com/vote.php3?no=33553 http://odn.okwave.jp/kotaeru.php3?q=529341 一応ご参考に。【はぎたゆう】さんの作品リストです。毎年のように名前を変えているのが特徴ですｗ 1985 ※この年は「萩田遊」名義 BCスピリッツ1〜3号　コミック・パフォーマンス劇場 71P BCスピリッツ21号コーラスガール 21P 1986　※この年は「萩多遊」名義 BCスピリッツ15号石になってしまったっ!! 20P BC11号ロバート 20P 1987 （資料行方不明の為不明） 1988 ※この年は「萩田遊」名義 BCスピリッツ1/20増二番目に好きな人 20P BCスピリッツ7/7増 DINKS 22P BCスピリッツ11/9増自由に平等 24P 1989 ※この年以降「萩多遊」名義 SUPERジャンプ増刊本日も晴天なり 28P SUPERジャンプ7月号男のさしすせそ 25P 1990（発表作品なし） 1991 Mr.ラビング3号黙って俺についてきな 15P SUPERジャンプ5月増かけはぎのひと 25P 1992−1994 (発表作品なし？名前見つからず） 1995 SUPERジャンプα2,4,6号かけはぎのひと 75P COMIC ALLMAN11号かけはぎのひと 25P 1996 ※この年は「萩多広志」名義 COMIC ALLMAN5号かけはぎのひと 25P COMIC ALLMAN7-24号ポチ、つれていこう！ 175P ...

[ 2006 ]

しょーこりもなくカバン

Test::WWW::Mechanize

CGI::Application で、REQUEST_METHOD で dispatch したい

CGI::Application::Plugin::DispatchRequestMethod 作ってみた

空港の正面から飛行機を愛でる

萩多遊その後

今日も猪名川。いいなぁ、猪名川

雨散歩

モノクローム

コウモリさん