wanijiのブックマーク - はてなブックマーク

Redisのクエリーアナライザー "redis-traffic-stats" を書きました - （ひ）メモ
redis-traffic-stats という Redis のクエリーアナライザーを作りました。 https://github.com/hirose31/redis-traffic-stats redis-traffic-statsはtcpdump -wで書き出したpcapデータを解析して、以下のような統計を表示します。総ネットワークトラフィック量と平均byte/sec 総リクエスト数と平均とピークのreq/sec コマンド毎のリクエスト数、総リクエスト数に占める割合、req/secを、リクエスト数が多い順に上位10コマンドを表示コマンド毎の総転送バイト数、byte/secを、総転送バイト数が多い順に上位10コマンドを表示コマンド別に、キー毎の総転送バイト数、byte/sec、リクエスト数、リクエスト数の割合、req/secを、総転送バイト数が多い順に上位10キーを表示時間のかかっ
waniji 2016/05/06
redis

tcpdump
リンク
Time::Piece とタイムゾーンの甘い罠 - （ひ）メモ
use Time::Piece; use Time::Seconds; use POSIX qw(strftime); sub print_tp { my $tp = shift; printf("date : %s\ntzoffset: %d\nepoch : %d\nstrftime: %s\n\n", $tp->strftime('%Y-%m-%d %T'), $tp->tzoffset, $tp->epoch, strftime('%Y-%m-%d %T', localtime($tp->epoch)), ); } print "Time::Piece ",$Time::Piece::VERSION,"\n"; my $tp; $tp = Time::Piece->strptime("2011-01-01", "%Y-%m-%d"); print_tp($tp); $tp = lo
waniji 2014/06/16
Perl

time-piece
リンク
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 gdb perl に加え、拙作の inspect-perl-proc について話しました。 https://github.com/hirose31/inspect-perl-proc 今のところ 3 つ
waniji 2013/09/26
yapcasia2013
リンク
シェルスクリプトでハマった件→【募】ステキな回避方法 - （ひ）メモ
追記: 解答編を下の方に書きました！！！追記: お題に不備があったので変更しました＞＜あとgistに一式置いたので簡単にテストできます！！ https://gist.github.com/hirose31/6232206 git clone https://gist.github.com/6232206.git oreno cd oreno ./test.sh source_me.sh ... シェルは GNU bash, version 4.1.5(1)-release です。こんな source_me.sh と、 case $PATH in */oreno/bin*) : # do nothing ;; *) . orenorc LOADED_ORENO=1; export LOADED_ORENO ;; esac orenorc ってファイルがあって、 ORENO_HOME="
waniji 2013/08/16
bash
リンク
1