Devel::NYTProf で Starlet/Starman (Plack) でうごくウェブアプリケーションのプロファイリングをおこなう方法まとめ - tokuhirom's blog
Devel::NYTProf は Perl5 の世界でもっとも人気があるプロファイラである。表示が美麗であるし、ステップごとの処理速度が簡単にわかるのでとても便利だ。 そんな Devel::NYTProf であるが、Starlet/Starman のようなプリフォーク式のサーバーでうごくウェブアプリケーションとくみあわせる場合の方法論として、わかりやすい資料がみあたらなかったのでここに記すものである。 環境変数 NYTPROF を設定する Devel::NYTProf は環境変数で挙動を変えられる。 plack とくみあわせる場合には、以下のようにするとよい。 NYTPROF=sigexit=int:savesrc=0:start=no sigexit=int 通常、Devel::NYTProf は END { } ブロックでデータのファイナライズ処理をおこなうのだが、SIGNAL によっ
YAPC::Asia 2013ではてなのサーバ管理ツールの話のはなしをしました - ゆううきブログ
YAPC::Asia 2013で"はてなのサーバ管理ツールの話"というはなしをします - ゆううきブログ YAPC::Asia Tokyo 2013で、アルバイトで開発してたサーバ管理ツールのはなしをしました。 前半がサーバ管理ツールの開発思想で、後半がサーバメトリクス可視化の実装についてです。 キワモノツールであるRRDtoolの話は後ろに押し込んであるので、興味ない方は最初のほうだけ見てもらえればよいと思います。 感想 トーク後に結構話しかけられたりしてうれしかった。 トークの内容をブログに書いて、インターネット上で何か反響を得たことはあったけど、トークしたその後、直接話しかけられることは今まであまりなかった気がする。 コミュニティで認められるのに何か発表するのって大事だなと改めて思った。 RRDtoolをご存知の方が会場内でパッとみで1/4くらいいらっしゃったので、結構インフラ系の人
Perlの書けない女子大生がはてなインターンに参加してきた - ぴよぴよ.py
精神の時の部屋でお馴染みのはてなインターン(8/12 - 9/6)に、 Perlの書けない情弱女子大生が参加してきました。 photo by Norio.NAKAYAMA はてなインターンのいいところ ＊Webアプリ開発をひと通り体験できる 詳しくは インターン前半まとめに書きますが、 はてなインターンでは設計からサーバーサイド/クライアントサイドの実装までを2週間で体験することができます。 毎日午前中に講義を受け、午後にはその話題に関連する課題が出されます。 わからないこともたくさんありますが、 スーパーエンジニアさんが学生2人に対して1人メンターとして常についてくれるという最高に贅沢な環境でプログラミングをすることができます。 楽しすぎて定時には帰れませんでした。 ＊エンジニアになりたい学生にとって最高の環境 エンジニアになりたい学生にとって最高の環境とはなんでしょうか。 6万円以上す
モダンPerl製サイトのベース解説書『Plack Handbook』を読んだ | hirobanex.net
Plack Handbookは、CGI以降の最近のPerlを使ったウェブサイトを作る上でベースとなるPSGIという仕様の実装であるPlackのまとまった(電子)書籍です。待ちに待ってましたという感じだったんですが、でやっと入手して読んだ感想とかをメモります。 といいつつPlackって何?詳しく教えて? 上述した通りなものがPlackなのですが、FTPでアップしてふんふんふん、という事をしている人にとって、いまいちピンとこないのがPlackだと思います。昔は、FTPを使って.cgiファイルみたいなのをアップしてちょっとした動的な動きをするページを作るには、PerlだとCGI.pmというCPANモジュールに準拠しながらいろいろと作っていたのです。ただ、ApacheのCGIという技術の上だと、何分毎回プログラムファイルの読み込みをとかを行うので遅かったりしたのです。そこで、FastCGIとかmo
ゆーすけべー日記
サキとは彼女の自宅近く、湘南台駅前のスーパーマーケットで待ち合わせをした。彼女は自転車で後から追いつくと言い、僕は大きなコインパーキングへ車を停めた。煙草を一本吸ってからスーパーマーケットへ向かうと、ひっきりなしに主婦的な女性かおばあちゃんが入り口を出たり入ったりしていた。時刻は午後5時になる。時計から目を上げると、待たせちゃったわねと大して悪びれてない様子でサキが手ぶらでやってきた。 お礼に料理を作るとはいえ、サキの家には食材が十分足りていないらしく、こうしてスーパーマーケットに寄ることになった。サキは野菜コーナーから精肉コーナーまで、まるで優秀なカーナビに導かれるように無駄なく点検していった。欲しい食材があると、2秒間程度それらを凝視し、一度手に取ったじゃがいもやら豚肉やらを迷うことなく僕が持っているカゴに放り込んだ。最後にアルコール飲料が冷やされている棚の前へ行くと、私が飲むからとチ
Perlの開発環境構築メモ - hide-k.net#blog
最近、社内で初対面の人に自己紹介すると「あ！twitterでfollowしてます。AKB好きな方ですよね？」と辱めを受けてることが多くて色々反省しています。 こんばんは。 先日、会社で新しいMac Book Airを支給されて開発環境を再構築して、せっかくの機会だったので自分の環境をメモりました。 YAPC::Asia 2010でtokuhirom氏の「モダンな Perl5 開発環境について」で大きく取り扱われたり、あちらこちらで散々エントリされていますが毎回ぐぐるのも面倒なのではっときます。 0. 下準備 gccや各種ライブラリが必要なので何はなくともXcodeをインストールします。僕はiOS SDK付きをダウンロードしてインストールしました。 ついでにhomebrewもインストールしておきます。 sudo dscl /Local/Default -append /Groups/staf
Mojolicious Web Framework
11,907 commits closer to perfection! Mojolicious is a fresh take on Perl web development, based on years of experience developing the Catalyst framework, and utilizing the latest web standards and technologies. You can get started with your project quickly, with a framework that grows with your needs. The Mojo stack provides a consistent set of components that can be used in any project. The guide
モダンな Perl の開発環境の構築方法 - TokuLog 改メ tokuhirom’s blog
一般的な OSX 環境および Linux 環境における、モダンな Perl 開発環境の構築方法についてまとめてみたよ。 下準備コンパイラなどをまずインストール。OSX なら Xcode、debian なら apt-get build-dep perl する。 perlbrew のインストールperlbrew をつかうことにより、簡単に最新版の Perl5 を利用することができるようになる。 perlbrew をいれる。 % curl -LO http://xrl.us/perlbrew # curl がなければ wget でもよい(あたりまえ) % perl perlbrew install % rm /home/poo/perlbrew % ~/perl5/perlbrew/bin/perlbrew init ~/.bashrc (または ~/.zshrc)に source ~/perl
Text::MicroTemplate::DataSection - unknownplace.org
__DATA__ に __DATA__ @@ index.mt <html> <body>Hello</body> </html> @@ bar.mt ? if ($true) { Foo ? } こう言うのが書いてあるとき、Data::Section::Simple を使うと get_data_section('index.mt'); とすることで該当セクションだけのデータを簡単に取得することができます。 なので普通の Text::MicroTemplate と組み合わせても render_mt(get_data_section('index.mt')); って感じで使えてそんなに苦じゃないわけですが、どうせなら中で include とか extends とかで他のセクションのデータとも連携できるようにしたら便利だなーと思い3分クッキングして Text::MicroTemplate::D
Perlでマルチスレッド
2003年3月15日 (土) - Perl ithreads 休日なので、 Perl 5.8.0のマルチスレッドプログラミングで遊ぶ。 use v5.8.0; use strict; use threads; my $thread1 = threads->new(\&main, "One"); my $thread2 = threads->new(\&main, "Two"); $thread1->join; $thread2->join; print "done.\n"; sub main { my ($name) = @_; for (1..10) { print "I am $name ($_)\n"; threads->yield(); } } 以下が実行例。 I am One (1) I am One (2) I am Two (1) I am One (3) I am Two
Perl の iThread 使って負荷試験ツールを書いてみた
えーっと、最近のお仕事でデータベース関連やってまして、DBMS としての性能試験みたいなのを実施したくて（しなくてはいけなくって・・・）、Perl で作ってみました。 いや、Apache bench とか使ってもいいんですが、httpd のメモリ使用量とかも馬鹿にならないので、Perl の ithread 使って書いてみることにしました。 →Perl の ithread 使うとメモリ一杯使うので、結果的に同じだったけど・・・（苦笑 プログラムの構造は、producer & consumer モデルってやつの応用です。具体的にはこんな感じ。 で、負荷スクリプトを走らせている間にデータベースサーバの負荷を vmstat なり、sar なりで計測すればＯＫです。キューに投入するリクエスト数（producer スレッドの enqueue 数）や処理スレッド数（consumer スレッドの数）を増減
vim × Perl のコンパイルを簡単にするコマンドと設定 (Perl.vim) - iDeaList::Writing
perl.vimコンパイラプラグインで、Perlコードをクィックフィックスする。 — 名無しのvim使いのエントリーを読んで、 デフォルトでPerl.vimが入ってるという事を知ったのが数週間以上前。 便利すぎてすごくショックだったのでメモメモ。 Perl.vimとはなにか 概要 compilerディレクトリにあるperl.vimコンパイラプラグインを使うと、 Perl言語で書かれたコードの文法チェックと、QuickFixリストを利用したコードの修正作業を手早く行えます。 インストール方法 perl.vimコンパイラプラグインは、デフォルトでインストールされています。 perl.vimコンパイラプラグインで、Perlコードをクィックフィックスする。 — 名無しのvim使い 1) Perlコンパイラの選択 :compilerでコンパイラの選択 vim docs :comp[iler][!]
perl - 配列の∪と∩ : 404 Blog Not Found
2010年05月01日13:15 カテゴリLightweight Languages perl - 配列の∪と∩ これを解くためには、配列の∩(交わり、intersection)がわかればいいのですが… Perl Cookbook (English) Christiansen / Torkington [邦訳: Perlクックブック] perlかPHPで解決したいです。 複数(最大200程度)の配列があり、 それぞれ有している数字(それぞれ最大50程度)のうち、 二つ以上の値が同じ配列名を抜き出す。 という事をし.. - 人力検索はてな複数(最大200程度)の配列があり、 それぞれ有している数字(それぞれ最大50程度)のうち、 二つ以上の値が同じ配列名を抜き出す。 実にエレガントな方法が、Perl Cookbookに載っています。 以下、実例。 #!/usr/bin/perl use st
Released Router::Simple 0.01 - tokuhirom's blog
http://github.com/tokuhirom/p5-router-simple my $router = router { connect '/' => {controller => 'Router', action => 'index'}; submapper('/entry/{id:[0-9]+}', controller => 'Entry') ->connect('/show', {action => 'show'}) ->connect('/edit', {action => 'edit'}); }; my $psgi_app = sub { my $env = shift; if (my $p = $router->match($env)) { "MyApp::C::$p->{controller}"->can($p->{action})->($env, $p->{a
現代的なPerlの記述方法一覧 - Perl入門ゼミ
Perl › here Perl5.8以降における標準的なPerlの書き方を解説します。 インターネットで検索するとPerl4のころの古い記述がたくさんあります。また書籍などの多くもPerl4の記法で書かれています。Perl4の記法は複雑になりやすく間違いを生みやすいのでこれからPerlを書く人はPerl5の現代的な記法で記述することを強くお勧めします。 strictプラグマとwarningsプラグマ (必須) strictプラグマとwarningsプラグマを有効にします。 use strict; use warnings; use strict;とuse warnings;の２行はスクリプトの最初に必ず記述してください。これらはPerlの文法チェックを厳しくするためのものです。面倒だという軽い気持ちでこれを記述しないと後々本当に面倒なことになります。 use strict;とuse wa
BEGIN{ require Llama } #書評_ - 初めてのPerl 第6版 : 404 Blog Not Found
2012年07月20日19:30 カテゴリ書評/画評/品評Lightweight Languages BEGIN{ require Llama } #書評_ - 初めてのPerl 第6版 オライリー矢野様より献本御礼。同封のTシャツもXXLでうれしい。 初めてのPerl 第6版 Randal L. Schwartz / Tom Phoenix / brian d foy / 近藤嘉雪訳 [原著:Learning Perl, 6th ed.] 初出2009.10.20 第五版; 2012.07.20 第六版に改訂 こういうのを見ると、やはりプログラマーにはオライリーという思いを新たにする。累計50万部のベストセラーの最新刊、ついに訳出! Perlを習いたい人だけではなく、プログラミングそのものを初めてたい、コンピューターを便利な道具以上のものとして使えるようにしたい人にもお勧め。書籍名に"P
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
YAPCで「はてなブログの開発フロー」について話してきました - 大西ブログ
Perlゼミ(サンプルコードPerl入門)
YAPC::Asia 2日目 「はてなブックマークのシステムについて」 - naoyaのはてなダイアリー
YAPC::Asia 2009 / Asynchronous Programming for (A)synchronous Communication