YAPC::Asia 2013でLT『How to inspect a RUNNING perl process』してきました＆スピーカーへのお願い - （ひ）メモ
YAPC::Asia 2013でLT『How to inspect a RUNNING perl process』してきました How to inspect a RUNNING perl process / YAPC::Asia Tokyo 2013 http://www.slideshare.net/hirose31/inspect-runningperl ハングアップとかメモリバカ食いとか、稀にしか発生しないヘンテコ状態のシューティングやるには静的デバッグより、今ヘンテコ状態にあるプロセスを直接まさぐるのが手っ取り早いよねーということで、既存の手法、 strace gdb bulkdbg gdbperl に加え、拙作の inspect-perl-proc について話しました。 https://github.com/hirose31/inspect-perl-proc 今のところ 3 つ
MobileHackerz再起動日記: 秋葉原ラジオストアーが11月末で閉館！？と聞き、勝手ストリートビューを作ってみた
2013/09/25 ■ 秋葉原ラジオストアーが11月末で閉館！？と聞き、勝手ストリートビューを作ってみた ※RICOH THETA関連のHACKが増えてきたので、まとめた別ページを作りました 秋葉原の“昔ながらの”部品屋さんが集まる「秋葉原ラジオストアー」が64年の歴史に幕を閉じ、2013年11月30日で閉館すると発表されました。「秋葉原ラジオストアー」は、その名前までは認識していなくとも「JR秋葉原駅から中央通りに出ようとすると見かける、ガード下のごちゃっとした素人お断り風の路地」といえばわかりますでしょうか。あの一角はいくつかの建物？の集合体なのですが、そのうちのひとつが「秋葉原ラジオストアー」です。秋葉原はラジオ（電子部品）の街→電気製品の街→PCの街→萌えの街、というような変遷を経ていますが、この「電子部品の街」の頃から全くその景色が変わっていない、ザ・秋葉原という雰囲気を残す一
How to inspect a RUNNING perl process
スクリプトを修正することなく外部から稼働中のperlプロセスの状態を観測する方法について、既存の手法をおさらいした上で、導入コストが小さい手法でパッケージ毎のメモリ使用状況や%INCのダンプをする方法を提案します。Read less
Perl UTF-8 crash course
I’ve been seeing the occurrences of perl programmers not understanding perl’s very simple (and sometimes buggy but easily fixable) handling of Unicode strings. I confess I had the same misunderstanding until 6–7 years ago, and don’t want everyone to repeat the same mistake. Let’s forget what you know for 5 minutes, and take this simple course. 1. print($a, $b) and print($a . $b); Let’s forget, for
PSGI/Plackアプリケーションの起動方法いろいろと本番環境アレコレ - blog.nomadscafe.jp
PSGI/Plack/PSGIアプリケーションを動かす時に一番使われているのは plackup でしょう。 $ cat app.psgi use Plack::Builder; use MyApp; my $app = MyApp->psgi_app; builder { enable 'ServerStatus::Lite', => ..; $app; }; $ plackup -E production -s Starlet --max-workers 30 --port 5000 -a app.psgi plackup コマンドの -s にハンドラ名を指定して起動します。本番環境では -E や $ENV{PLACK_ENV} を指定してStackTraceやLintといった開発に便利なPlack::Middlewareが追加されないようにする必要がありますね。 Starmanの場合は
scan-prereqs-cpanfile
NAME scan-prereqs-cpanfile - Scan prerequisite modules and generate CPANfile SYNOPSIS % scan-prereqs-cpanfile --diff=META.json # Generate diff from META.json --diff=cpanfile # Generate diff from cpanfile --ignore=extlib --dir=/foo/bar --scan-test-requires DESCRIPTION This script scans prerequisite modules from your code, and generate CPANfile. You can also list missing prerequisite modules. SCANNI
unix domain socketでファイル記述子をやりとりするソケットプーリングを書いてみた - （ひ）メモ
unix domain socket経由でプロセス間でファイル記述子のやりとりができるので、コネクションをプーリングして、unix domain socket経由で別プロセスに貸し出すスクリプトを試しに書いてみました。 https://github.com/hirose31/socket-pooling poold.pl は起動すると 127.0.0.1:11211 へのコネクションを 3 つ作って保持し、unix domain socketをlistenしてクライアントからの貸し出し要求を待ちます。 ちなみに、unix domain socket は名前付きのではなく、abstract namespace のを作っています。これの利点は、パスに依存しないので、chroot内のプロセスと外のプロセスがやりとりできる点です。 client.pl は起動すると、unix domain sock
本番環境でのperl/ruby/nodeのセットアップ - たごもりすメモ
本番環境にperlとかrubyとかnodeを入れるんだけど、もちろん system perl じゃやってられないので指定したバージョンのものを一般ユーザの管理下に突っ込みたい。 で、そういうのをこれまで perlbrew とか rvm とか rbenv とか nvm とか nodebrew とかでやってたんだけど、さすがに色々疑問が湧いてきた。バッチで単発実行するために eval "$(rbenv init -)" とかさすがにおかしくね？ みたいな。 ということで tokuhirom method 的にインストール用の簡単コマンドを使って実行、あとはパスを通せばいいじゃん、ということにしようかと思う。 参考: サーバーのセットアップは perlbrew とかじゃなくてよくね? という時のライフハック - blog.64p.org これ、今朝までは Perl::Build をどうにかしてC
Perl のハッシュ値の再計算メカニズムの脆弱性 - JPA 運営ブログ
JVNでも公開されていますが、perl 5.8.2からperl 5.16系までのバージョンでハッシュ値の計算に対する脆弱性が報告されています。 perl 5.16系であれば perl 5.16.3、5.14系であれば perl 5.14.4 で修正がされていますので、アップグレードを推奨されています。 すでにEOLとなっているperl 5.8系、5.10系、5.12系ではgit レポジトリに存在するパッチを適用することでこの件に関しての修正を行う事ができます (perl 5.8 -> レポジトリ 対象コミット、 perl 5.10 -> レポジトリ 対象コミット、 perl 5.12 -> レポジトリ 対象コミット 各ベンダー提供のperlも自前でインストールしたperlもアップグレードが推奨されています。
Plack Performance Tips - mount() and query_parameters() : D-7 <altijd in beweging>
すごいヘビーな負荷を受けているPSGIアプリケーションで「なんでこれで負荷があがるの？」的な現象があったので二つほどTipを。ちなみにこれは 2013/03/06時点での話なので、もしこれをあなたが大分将来に読んでいるのなら、状況に変更がないかちゃんと確認すること！ まずこのお話の前提：mod_perlなアプリをPSGIに移行したかった。アプリはmod_perlハンドラで書かれているので、Apache::RequestをPlack::Requestに書き換えたり、ハンドラ部分をオブジェクトにしてキレイにするくらいで、基本的な構造は何も変えてない（←ここポイント）。あとはApache側とか設定をもりもりいじって、PSGIファイルを書いて、Starletでデプロイして、パフォーマンスが30%くらい悪くなった。さて、犯人は誰でしょう？ まずアプリケーションを組む側が「やっちまったなぁ？」な件：P
はてなグループの終了日を2020年1月31日(金)に決定しました - はてなの告知
はてなグループの終了日を2020年1月31日(金)に決定しました 以下のエントリの通り、今年末を目処にはてなグループを終了予定である旨をお知らせしておりました。 2019年末を目処に、はてなグループの提供を終了する予定です - はてなグループ日記 このたび、正式に終了日を決定いたしましたので、以下の通りご確認ください。 終了日: 2020年1月31日(金) エクスポート希望申請期限:2020年1月31日(金) 終了日以降は、はてなグループの閲覧および投稿は行えません。日記のエクスポートが必要な方は以下の記事にしたがって手続きをしてください。 はてなグループに投稿された日記データのエクスポートについて - はてなグループ日記 ご利用のみなさまにはご迷惑をおかけいたしますが、どうぞよろしくお願いいたします。 2020-06-25 追記 はてなグループ日記のエクスポートデータは2020年2月28
開発メモ#1 : Cinnamon によるデプロイ - naoyaのはてなダイアリー
このごろ作っているものが幾つかあるのだけど備忘録代わりにこの辺はこうしているということを書いて行こうかなと思います。 まずは Perl によるアプリケーションのデプロイについて。id:antipop と id:shiba_yu36 が開発した "Cinnamon" というミニマムなデプロイツールを利用しています。 Cinnamon - A minimalistic deploy tool https://github.com/kentaro/cinnamon シンプルで使いやすいデプロイツールです。 Capistrano? デプロイツールの定番といえば Capistrano で、最初は Capistrano を使っていました。けど、作っているものはほぼ Perl で書かれているのにデプロイツールだけ Capistrano で Ruby というのが、例えばモジュールの管理に Carton と
にひりずむ::しんぷる - implemented insert_on_duplicate method on SQL::Format v0.09
We need `INSERT ON DUPLICATE KEY UPDATE` statement on MySQL. Already, insert_multi (or insert_multi_from_hash) method can generate it statement. (implemented on SQL::Maker, SQL::Abstract and SQL::Format) Sometimes, I need updating single record. But insert_multi method name is strange at that time. And, arguments is redundant :( use SQL::Format; my $sqlf = SQL::Format->new; my ($stmt, @bind) = $sq
Tom Christiansen’s Materials for OSCON 2011
HTML slideshow for viewing Original pod source for hacking PDF for printing 3. Unicode Support Shootout: The Good, The Bad, & the (mostly) Ugly HTML slideshow for viewing Original pod source for hacking PDF for printing Fonts I recommend you get both of two free fonts from George Douros that are known to work: his Alfios font for regular text, and his Symbola font for fancy emoji. As these talks co
DBI->connect 時に使う鉄板オプションを教えて！ - blog.nomadscafe.jp
perlでデータベースを使う時に誰もが必ず使うDBI。その接続時に使うconnectメソッドの第4引数に設定しているオプションがサービスによりまちまちなんだけど、だれか鉄板設定を教えてください。 僕が使うのが、 my $dbh = DBI->connect($dsn, $user, $password, { AutoCommit => 1, PrintError => 0, RaiseError => 1, ShowErrorStatement => 1, AutoInactiveDestroy => 1, }); これ。 加えて、mysqlであれば mysql_enable_utf8 => 1 mysql_auto_reconnect => 0, SQLiteだと sqlite_unicode => 1 sqlite_use_immediate_transaction => 1 を追加し
Big Sky :: plackup の --path 引数
plack を使ってて「サーバのサブフォルダを間借りして動かしたい」って事がたまにあるんだけど、そんな場合 nginx の設定でリバースプロキシに渡すって事をやります。 location /foo { try_files $uri $uri.html $uri/index.html @proxy-foo; } location @proxy-foo { proxy_pass http://localhost:5000; proxy_set_header Host $http_host; } この場合、通常の Plack アプリケーションだと / がアプリケーションルートになっているので404になってしまう。よって app.psgi とは別に !perl use strict; use warnings; use Plack::Builder; use Plack::Util; builde
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
Hacking Transcend WiFi SD Cards
set the download speed with LWP - Perl
Kazuho@Cybozu Labs: Perl で並列処理 (using マルチプロセス)
Admob.pm