Pure PerlなHTTPdを物色 - （ひ）メモ
HTTP::Daemon forkしないので、1個詰まると後続のリクエストは待たされる。 HTTP::Simple::Server デフォルトではforkしない。 HTTP::Simple::Server ＋ Net::Server::Fork forkするので多重化可能。が、リクエストごとに新しいプロセスをforkしちゃう。 HTTP::Simple::Server ＋ Net::Server::PreFork forkするので多重化可能。pre-forkするのでプロセスは使いまわせる。 Net::HTTPServer type=>'forking'でpre-forkする。 URLのパスと関数をマッピングできるのもよさげ。 PerlBal Danga::Socketベースなので、IO多重化(epollとか)な実装。（だと思うす） POE::Component::Server::HTTP
PerlInterpMax の示すもの
daily dayflower などの情報をみて worker MPM な Apache を利用しても、同時に利用可能な Perlインタプリタ（mod_perlプロセス） は PerlInterpMax に制限されるように思っていました。デフォルトではこの値は 5 であり、一見少なく感じられます。 サーバDoS事件 ご存じのとおり本 blog.abk.nu サーバは、以前まで「データベースに接続できないエラー」を吐いてブログが表示されないことが多々発生していました*1。以前の設定値は次のとおりです。 mod_perl : PerlInterpMax 5 PostgreSQL : max_connections = 15 これでも、PostgreSQLへのコネクションが足りなくなりエラーとなっていました。PostgreSQLへのコネクションを保持するデーモンは adiary の他にありません
はてなグループの終了日を2020年1月31日(金)に決定しました - はてなの告知
はてなグループの終了日を2020年1月31日(金)に決定しました 以下のエントリの通り、今年末を目処にはてなグループを終了予定である旨をお知らせしておりました。 2019年末を目処に、はてなグループの提供を終了する予定です - はてなグループ日記 このたび、正式に終了日を決定いたしましたので、以下の通りご確認ください。 終了日: 2020年1月31日(金) エクスポート希望申請期限:2020年1月31日(金) 終了日以降は、はてなグループの閲覧および投稿は行えません。日記のエクスポートが必要な方は以下の記事にしたがって手続きをしてください。 はてなグループに投稿された日記データのエクスポートについて - はてなグループ日記 ご利用のみなさまにはご迷惑をおかけいたしますが、どうぞよろしくお願いいたします。 2020-06-25 追記 はてなグループ日記のエクスポートデータは2020年2月28
バージョンを指定してCPANモジュールをインストールする - ヒルズで働く@robarioの技ログ
Apache::MP3のバージョンを下げる 経由で Perl モジュールのバージョン指定インストール を知った。今までsearch.cpan.orgに行ってtarballダウンロードして展開してビルドしてインストールして、ってやっちゃってました。。。 非常に助かりマスク。 http://search.cpan.org/に行かなくてもIDを調べられるので % cpan -D Apache::MP3 # CPAN-v1.9102 Apache::MP3 ------------------------------------------------------------------------- (no description) L/LD/LDS/Apache-MP3-4.00.tar.gz Installed: CPAN: 3.06 Not up to date Lincoln D. St
spamlinkcheck.rb 再導入, Perl のオブジェクトについて最近理解した分のメモ
今度は spamlinkcheck.rb onデバッグモード offで。 referer が記録されつつ TrackBack spam が来ないかどうかを静観。 [追記] だいじょぶっぽい。デバッグモードが原因か？ 以前勉強してから情勢（って）が変わってきたものや抜けていた部分のメモ。 Perl のオブジェクトは bless したリファレンス 以前はハッシュリファレンスを bless するのが主流だった（と、自分は認識している）が、最近はスカラリファレンスを利用した Inside-Out Object もオシャレなのかも。Class::Std を使うと便利bless で結びつけられた package 名を取得するには以下の方法がある refScalar::Util の blessedオブジェクトには実は便利メソッドがある UNIVERSAL 嫁isa() と can() がありゃ十分ちゃ十
最速インターフェース研究会 :: TemplateToolkitでハッシュを使う時の注意
http://naoya.g.hatena.ne.jp/naoya/20070828/1188305840 ハッシュのキーの先頭が_だと取れなくなる、って話だけど、 それライブドアの社内IRCで去年の9月11日に散々既出のネタだよ。 ハッシュキーの先頭が.か_だとプライベートになって、itemだと取れなくなる。これはTTの仕様。 回避したいときは自前でプライベート関係なく値を取れるメソッドを定義してやればOK。 http://www.template-toolkit.org/pipermail/templates/2006-January/008206.html バージョンごとの検証とかしてないけど多分これで平気なはず。
tokuhirom blog
Blog Search when-present<#else>when-missing. (These only cover the last step of the expression; to cover the whole expression, use parenthesis: (myOptionalVar.foo)!myDefault, (myOptionalVar.foo)?? ---- ---- FTL stack trace ("~" means nesting-related): - Failed at: ${entry.path} [in template "__entry.ftlh" at line 3, column 25] - Reached through: #include "__entry.ftlh" [in template "entry.ftlh" at
tokuhirom blog
Blog Search when-present<#else>when-missing. (These only cover the last step of the expression; to cover the whole expression, use parenthesis: (myOptionalVar.foo)!myDefault, (myOptionalVar.foo)?? ---- ---- FTL stack trace ("~" means nesting-related): - Failed at: ${entry.path} [in template "__entry.ftlh" at line 3, column 25] - Reached through: #include "__entry.ftlh" [in template "entry.ftlh" at
配列からランダムで要素を抽出する - Unknown::Programming
覚え書。 Perl版。 my @array = (0,1,2,3,4,5); my $value = splice @array, int rand @array , 1; PHP版。 <?php $array = array(0,1,2,3,4,5); $value = array_shift(array_splice($array,array_rand($array),1)); PHPのことだから一発で抽出できる関数あるもんだと思ってたけど無かったっぽい。 肝心なとこで関数無いんだよないつも・・・。 追記： ちょっと言葉足らずだったので補足。 配列からランダムで要素を”取得”したいわけではなく、”抽出”したいわけです。 つまり上記のソースを実行すると、 @array = (0,1,2,4,5); $value = 3; みたいな感じで元配列から抜き取るような結果になって欲しいと。 Li
ずんWiki - Perlでマルチスレッド
目的 † 元々はメール配送システムを作ろうとしていた。 そのシステムでは複数の宛先へのメール配送を1通毎に並列にやりたかったし、 スレッドが無限に増えてしまってもリソースを消費しすぎて困るのでそれを制限したかった。 また、相手サーバの事情によっては纏めて数万通とか出すと怒られるときがあるのでメールの配送ペースも調整したかった。 以上がマルチスレッドプログラミングを勉強する目的だった。 ↑ ソース † 上記条件を満たすサンプルが出来たのでメモ。 ダウンロードも出来るようにしておく。 このソースには無駄なコードや、こうした方が良かったとか思うところがいっぱいあるんだが修正するのが面倒い…。 参考にする方は、とりあえず参考にするだけして、自分で色々試して良いと思った方法をとったほうが良いです ithread_test.pl #!/usr/bin/perl use strict; use thre
1
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
はてなブログ | 無料ブログを作成しよう
https://labs.cybozu.co.jp/blog/kazuho/archives/2007/09/mysql_async.php
hoge_mugeをHogeMugeにする - Unknown::Programming
ずんWiki - CSVのパース