Don'tStopMusic

_ apache の使っているメモリ

子プロセスも含めた apache の実際の使用メモリを求めようと、mod_perl: Performance Tuning の Calculating Real Memory Usage を元に以下のコードを実行してみたところ、

#!/usr/local/bin/perl
use strict;
use warnings;
 
use GTop;
 
my $gtop = GTop->new;
my $total_real = 0;
my $max_shared = 0;
 
my $script = "ps auxww | grep httpd |  grep nobody | grep -v grep | awk '{print \$2}'";
 
my @apache_pids = split /\n/, `$script`;
for my $pid (@apache_pids) {
    my $proc_mem = $gtop->proc_mem($pid);
    my $size = $proc_mem->size($pid);
    my $share = $proc_mem->share($pid);
    $total_real += $size - $share;
    $max_shared = $share if $max_shared < $share;
}
$total_real += $max_shared;
 
print GTop::size_string($total_real) . "\n";

搭載メモリよりも大きい値になりました。こういうものなのでしょうか。

_ [Ruby][メモ] gem の Manifest.txt の更新

newgem で作成した gem の Manifest.txt を更新するワンライナーをちょっとメモ。

$ find . -type f -not -path \*svn\* | sed -e 's/\.\///' | sort > Manifest.txt

こんなんでいいかな。

_ [Ruby]SimpleCSV

2ch でlibcsv が紹介されていた ので拡張ライブラリを作ってみました。

simplecsv-0.0.1.tgz

必要なもの

• ruby 1.8.x
• libcsv

Linux 以外で動くか不明。マルチバイトで正しく動くか不安。あと parse しか実装してません。

実行例

require 'simplecsv'
SimpleCSV.parse(<<_CSV_) do |row|
one, two, three
1, 2, 3
_CSV_
  p row
end
#=> ["one", "two", "three"]
#=> ["1", "2", "3"]

追記

" や , の文字コードは Shift_JIS EUC-JP の多バイト文字とはかぶらないみたい。UTF-8 はかぶっているように見えるけど、実際試してみたら問題なくパースできました。とりあえず後回しにして困ったら追求しよう……

さらに追記 (2007/02/25 19:07)

ときどきの雑記帖 リターンズ

ん? sjisやeuc-jpでかぶらないという判定なら、utf-8でもかぶらないはずでは? どういう考え方をするとそうなるのだろう? 大雑把に云うと、utf-8のtrail byte は上位2ビットが必ず 10 なので、 ASCII(0〜0x7f)の範囲とは決して重なり合うことはないのだけど (lead byteも云うまでもなく)。

つっこみありがとうございます。単に理解していませんでした。適当なこと言ってすみません。U+0000 な文字表記とビットパターンを混同していたという……UTF-8 - Wikipedia エンコード体系を改めて眺めて理解しました。なるほど ASCII compatible という意味が分かりました。

_ [Ruby]SimpleCSV を rubyforge に登録申請してみた

newgem を使うと簡単に rubyforge にアップロード/更新できるようなので、せっかくですから rubyforge に登録申請してみました。

ついでに別サイトの wiki に SimpleCSV の簡単な説明ページを作りました。

_ [ネットサービス][Ruby] TimeLine

ニフティが @nifty TimeLineというのを始めたようですが、NaCl が開発に協力したこともあってか、こんな↓

タイムラインがあって面白いです。

23 世紀まで入力できるようなので、1.9 のリリースが遅れても大丈夫(?)そう。