tokuhirom's blog
How do I implement basic & simple authentication form with Plack::Middleware::Auth::Form
There is two issues for me. * This plugin does not care about CSRF vulnerable. * User logout from
2011-03-28(Mon)
iTerm2 の最新版で aquaskk がうまくうごかんので、こまったなあという話
[ ^^ でなおったんだけど、 [ ^^ でこわされてるので、しかも意図的にこわされてるので、どうしようかなあとおもっている。 OSX にくわしくないのでよくわからん。 とりあえず以下
2011-03-23(Wed)
Pod::Simple::XHTML's html_encode_chars
ながらく、HTML::Entities の第2引数が指定できなかったのだが、最新版(3.16)でできるようになってた。すばらしい。
2011-03-17(Thu)
都道府県別環境放射能水準調査結果をscrapingするの法 または PDF をスクレイピングするの法
[ このあたりからデータを取得できるわけだが、なぜか PDF なので、うんざりする。 こんなもんどうみても excel かなにかでつくってるんだから生データを提供しろといいたい。 まあ文句を
2011-03-16(Wed)
LWPx::ParanoidAgent で、contents がぶっちぎれるなあという場合の対策
[ このパッチあてればいいですね。bradfitz 氏は、パッチをあてたバージョンをリリースしてほしいところ。 ただ、ここで問題がおきることからもわかるように、LWPx::ParanoidAge
2011-03-14(Mon)
deep recursion を FATAL error にするの術
``` use warnings FATAL => 'recursion'; ``` ってかいておくと ``` Deep recursion on subroutine "MyMojoliciou
2011-03-06(Sun)
外部からリロードさせるときのちょっとした tips
[ これみて真似しようとおもったけども、自分のノートPCに開発用マシンから ssh ではいれるようにするのは嫌だしめんどくさいなーとおもったので、perl でちょろっとかいたら快適にうごいた。
2011-03-04(Fri)
Perlでもっとも簡単にタイトルタグの中身をしる方法
[ ``` % perl -MLWP::UserAgent -E 'say LWP::UserAgent->new()->get(" ``` LWP は title タグを解析してくれるので、こう
2011-03-02(Wed)
Amon2 with XMLRPC
[ Amon2 で XMLRPC をつかうには、RPC::XML をつかえばよろしい。context object は CLI などとおなじく MyApp->bootstrap() でいける。
2011-02-28(Mon)
Amon2 の最近の変更のまとめ(2.13〜2.23あたりまで)
* デフォルトのテンプレートを HTML5 に変更 * Tiffany への依存をなくした * [ を充実させた(using sphinx) * DBI へ依存してみたが、XS 依存しない方針だったこ
2011-02-27(Sun)
Class::Singleton は、べつにいらない。
Class::Singleton は、やたらコメントがながいのでだまされがちだが、実は以下のコードで同等のことができるので、あれを利用する意味は「シングルトンってわかりやすい!」ってこと以外にはなかっ
2011-02-27(Sun)
Text::Xslate と Tiffany と依存と。
Web application framework をつくっている場合、Tiffany を依存にいれるのがいやだ、というむきがあるかとおもいます。そんな場合、Xslate をつかうのであれば、別に T
2011-02-26(Sat)
softbank の絵文字情報ページから sjis 版の絵文字コードの情報が消失
2011-02-26(Sat)
chunked のおけつに 00000000 をかえしてくるサーバーがあるっぽい
ASP.NET なサーバーで 00000000 をかえしてくる人がいる。RFC 的には "0\\r\\n" をかえすべきだとおもうが、しょうがないので Furl では 00000000 もうけとれるよ
2011-02-25(Fri)
Perl でつくった web サイトを L10N する方法
Perl でつくった web サイトを L10N する方法について簡単に説明します。今回は、日本語のサイトを英語でも表示できるようにするケースをあつかいますよ。今回は L10N の対象は Amon2
2011-02-24(Thu)
Web::Query now supports ->parent and ->size
[ Following script works well under Web::Query 0.04+! ``` perl -CIO -MWeb::Query -E 'say wq(" img.
2011-02-22(Tue)
最近つかってる .vim/bundle のこと
まあこんなかんじ。 * minibufexpl(これもうつかわなくするかも) * mustache * neocomplcache * perldoc-vim * scss-syntax * uni
2011-02-22(Tue)
Web::Query - jQuery風にスクレイピング
[ Web::Query というスクレイピングフレームワークをかきました。一言でいうと「うごく pQuery」です。pQuery は jQuery とおなじ動きにするためかどうかしりませんが、わり
2011-02-20(Sun)
Scss で grid layout
compass の \_grid.scss を依存なしにしてみた。こういうかんじのパーツをいくつか自分用に確保しておくと製作がはかどりそうだ。 compass は、内部での依存がいろいろありすぎると
2011-02-14(Mon)
Perl5 で irb 相当のことをする方法、すなわち REPL をする方法
Perl5 で REPL(Read-Eval-Print-Loop)をつかいたければ、perl -de 1 をつかえばいい。 perl5 についているデバッガ機能をつかえば、一応 REPL っぽいこ
2011-02-14(Mon)
git で perl のドキュメントを翻訳したデータをおく場所つくってみた
[ ここにつくってみた。 「**Japanized Perl Resources Project は CVS だから面倒だ**」「**sourceforge.jp のアカウントつくるのめんどくさ
2011-02-12(Sat)
perldoc.jp のもろもろの改修が一段落した
* 白方さん翻訳分における Pod::L10N スタイルの目次の日本語訳形式への対応 * ディストリビューションページの整形 * 翻訳データをおくための git repository を追加 * Sc
2011-02-12(Sat)
Sass ためしてみた
ネストできたりmixinできたりして便利だった。 Sass2 まではまじ糞だなーってかんじだったんだけど Sass3 はいいかんじだった。 なので、perldoc.jp に導入しておいた。
2011-02-09(Wed)
Template Cascading についてかんがえてみた
[ 前回の話は、DOM ベースでうわがきすればいいんじゃね、っていう話が本筋だということにきづいたので、そういう風にできるライブラリをつくってみた。Just a PoC なんですけど。 * カスケ
2011-02-08(Tue)
継承ベースのテンプレートエンジンってほんとにいけてるの?
HTML をレンダリングするのに継承ベースのテンプレートエンジンがいけてる風な風潮があるけれど、どうも継承ベースってのはとっつきづらい気がしてる。INCLUDE していく方がデザイナーちゃんにはわかり
2011-02-07(Mon)
無限にのびるページのつくりかた
こうする。window.scroll イベントの中で直接やるやつは死ねばいいって jresig がいってたので、そうしてません。まだ死にたくないから。 FrePAN に導入してあるんだけど、もっとい
2011-02-06(Sun)
Testing JavaScript with node.js
[ JavaScript のライブラリやアプリケーションなどを JE でテストしたりするのは、筋が悪いとかんじます。創りかけのものを創りかけのものでテストするのは、時間の無駄になりやすいからです。
2011-02-05(Sat)
俺とPHP
なんか知らないうちにPHPを全然書いたことがないという噂が広まっていて心外すぎるので弁明しておく。長くなるかもしれない。 はい。全然書いたことないです。 【参考文献】 [
2011-02-04(Fri)
あたらしい perldoc.jp できたよー
[ perldoc.jp は、もともと miyagawa さんがつくったサイトだったわけですが、これを JPA が去年ぐらいにドメインだけひきとっていたのを、僕の方でウェブアプリケーションとして実装
2011-02-03(Thu)
Perl のモジュールローダー選定委員会
モジュールローダがいくつもあってよくわからんという話が twitter にかいてあったので、俺の選定基準をまとめてみた。 #### 候補 ##### Module::Load perl 5.10
2011-02-01(Tue)
How do you include a perlcritic options to xt/02perlcritic.t itself instead of xt/perlcriticrc
If you don't want to split xt/perlcritrc and xt/02perlcritic.t, so, you can write as following. ```
2011-02-01(Tue)
なんで Perl をつかいつづけるのか
#### 互換性を大事にしているから バージョンアップしてもそのままうごくっていうのはすごくいいですね。バージョンアップするための作業に自分の時間をとられたくないですね。 そういった意味では Py
2011-02-01(Tue)
最近は local::lib を直接つかわないでもいきていけるという話
```bash wget --no-check-certificate perl cpanm -l extlib My::Favorite::Module ``` ってやれば、extlib/ に
2011-02-01(Tue)
OAuth::Lite::Consumer をつかったアプリケーションのデバッグについて
``` use OAuth::Lite::Consumer; use Log::Minimal; my $client = OAuth::Lite::Consumer->new(...); my $
2011-01-31(Mon)
Amon2 2.13 でた
[ perl 5.10 以後でどうにゅうされた "//=" をなぜか script/amon2-setup.pl でつかってたのを修正した。 【追記】 dor ってかくと、結局うせた dor
2011-01-28(Fri)
perldoc.jp の perl 本体のドキュメントをみやすく表示するサイトできたよー
[ [ perldoc.jp はいかんせん、みるのがめんどくさいという難点があったので、もうちょいみやすく表示できるサイトをつくってみた。 公式ドキュメントのみに特化しています。perldo
2011-01-27(Thu)
Moxy 0.60 だした
[ なんかながらく releng してなかったということで、HEAD と二年分の乖離をみせていたので、いったんだした。 * iframe 化 * basic auth うざいからやめる → lo
2011-01-26(Wed)
iPhone とか android と HTTP::MobileAgent の関係について
なんかこんなかんじ。 ``` zigorou has joined (~zigorou@122x220x64x254.ap122.ftth.ucom.ne.jp) yappo38 そうそうHMAでi
2011-01-24(Mon)
multipart/mixed と PSGI とか Perl とか
HTTP Server から複数のファイルを一回のレスポンスでかえしたいときは multipart/mixed をつかうのが普通だとおもうのだけれど、それを Perl でやるにはどうしたらいいかという
2011-01-21(Fri)
あたらしい O/R Mapper の Teng でたよ
[ ActiveRecord 型の O/R Mapper であるところの DBIx::Skinny の後継です。 より RDBMS をリスペクトするようになった点、コードがよみやすくなった点が特徴
2011-01-18(Tue)
PSGI 対応のサーバーの使い分けについて
最近は、わたくしは以下のようにつかいわけております。 開発時には HTTP::Server::PSGI を使います。スタンドアロンでうごいて楽なので。本番では Starlet か Starman を
2011-01-18(Tue)
Imager 0.78〜0.79 で GIF のエンコードが異常におそい件
[ Imager 0.78 以後で、なぜか gif の圧縮がおそいのではないかということを [id:clouder]( さんにおしえていただいたので、ベンチマークをとって、本家に feedback
2011-01-14(Fri)
Redis の sorted set にかんするメモ
ほんとにチラ裏ですが。 [ をみてて、なんで redis の ZRANK はやいのかなーとおもって、しらべたののメモです。 skip list については、[ このへんがわかりいいとおもいました
2011-01-14(Fri)
わたし、諦めない! - Sub::Retry
DB に接続失敗したばあいに数秒後にリトライしてほしいとか、 API なげるのに失敗したときにリトライしてほしいとか、そういう処理を楽にかけるモジュールつくった。 以下のようにしてつかう。 ```
2011-01-13(Thu)
QRCode をどのフォーマットでだすのがいの?という話
[ ちょっと遅レスですが、プロファイラにかけてみると、実際には gif に encode するところで時間をちょうくってるということがわかった。 なんでだろう。Imager がおそいのか、減色処
2011-01-13(Thu)
GNU globals でソースを読む
vim とか emacs からよんでもいいのだが、めんどいので GNU globals で HTML を生成した。 ``` brew install global gtags -v htags op
2011-01-12(Wed)
Imlib2 に、オンメモリ保存機能をつけたいという話
という話をよく聞くのだが、対応させるためには、src/modules/loaders/loader\_\*.c に、オンメモリに保存する機能をつけて云々すればよさそう。というか、各フォーマットごとのエ
2011-01-12(Wed)
libkyototycoon をつかって 5分で C++ で RPC サーバーを書く方法
ちょっとした RPC サーバーを C/C++ でかきたいな、なんてケースはままあるわけですが、そんなときに便利なライブラリがあったので紹介します。 KyotoTycoon をつかうと、TSVRPC
2011-01-12(Wed)
Text::Darts が OSX でうごかなかったのでなおした。
[ OSX では IVSIZE != sizeof(int) なのでうごかないのでなおしました。 リリース希望>[id:dankogai](
2011-01-11(Tue)
FrePAN のスコアリングをチューニングした話
現時点で、search.cpan.org よりも、検索精度よくなったとおもいます。つまりこれは「俺がのぞむ検索結果」にちかい結果をだしてくれてる気がするという程度の意味ですが。 基本の検索エンジンに
2011-01-09(Sun)
XS::Object::Magic をつかって Magic なオブジェクトをあつかうの法
マルチスレッドで云々とかかんがえないでよいケースでは、XS::Object::Magic をつかうと楽にできる。 xs/typemap というファイルに以下の内容をコピペする。 ``` TYPEM
2011-01-05(Wed)
How to configure xs module depended on external library using pkg-config
If you want to write XS module, depended on external library using pkg-config, you just write like f
2011-01-04(Tue)
Catalyst::View::JSON から opera 用の workaround がとりのぞかれてた
[ [ だそうで。
2011-01-03(Mon)
新春連載企画: O/R Mapper についてかんがえてみた その1
あけましておめでとうございます。正月早々、O/R Mapper についてかんがえてみたことについて、ちょっとだけかいてみます。 #### O/R Mapper は RDBMS の差異をうめるためのも
2011-01-03(Mon)
pod を表示するためのウェブアプリを列挙してくスレ
#### インストール済のpodを表示する系 ##### Pod::Webserver Pod::Simple を使用。httpd はなんと自前実装。 ##### Pod::POM::Web
2011-01-02(Sun)
自分用 homebrew もどきをかきなおした
[ homebrew みてたら、こういう風にかけたほうがらくだわーとおもったので、かきなおした。簡単につかえるので、真似してつかってみてもいいかもしれない。
2010-12-31(Fri)
2010年の総括
なんだかんだでいろいろやりました。 #### 現在のPCなどの環境 * mac mini(仕事用) * macbook air(もちはこび及び家用) * SC440(サーバー) SC440はパー
2010-12-31(Fri)
Yet another CPAN search powered by groonga
[ FrePAN に incremental search を追加した。groonga を採用しており、非常に高速な検索が可能。スコアリングもそれなりに考えて実装してあるので、ぼちぼちいいかんじの結
2010-12-30(Thu)
use local::lib 'extlib'; のかわりにつかえる snippet
``` use File::Spec; use lib 'lib', File::Spec->catdir(qw/extlib lib perl5/); ``` 【追記】 実は archname
2010-12-29(Wed)
added 'args_pos' function on Smart::Args
Hi, I added the new 'args\_pos' function on Smarts::Args. It's very similar with 'validate\_pos' fun
2010-12-28(Tue)
Prev
Next