夏が来るたびに地獄のようなプール教室を思い出す

• データベースの内部動作を知る - 週末スペシャル：ITpro
• asahi.com（朝日新聞社）：大阪駅ホーム屋根を透明化、４割がガラス製　ＪＲ西発表 - 社会
• 404 Blog Not Found:#perl - $Config{usemymalloc}
  • perlで実行中にメモリを解放するかどうかは
  • perlfaq3
    • perl -V:usemymalloc とタイプすれば perl が使っている malloc がどちらであるかを知ることができます。

$ cat > a.pl
use strict;
use warnings;
my $s = shift || 256;
sub ps { print `ps ux  | grep $$ | grep -v grep`};
ps;
my $x = ' ' x ($s *  1024 ** 2);
ps;
undef $x;
ps;

// centos 5.5
$ perl t.pl
ymko      1473  0.0  0.3   6096  1756 pts/0    S+   22:16   0:00 perl t.pl
ymko      1473 43.2 94.5 530392 487452 pts/0   S+   22:16   0:01 perl t.pl
ymko      1473 44.0 44.2 268244 228288 pts/0   S+   22:16   0:01 perl t.pl 

// ubuntu 11.04
$ perl a.pl
hato      4467  0.0  0.0   6616  1700 pts/0    S+   22:16   0:00 perl t.pl
hato      4467  0.0 26.8 530912 526128 pts/0   S+   22:16   0:00 perl t.pl
hato      4467  0.0 13.4 268764 263992 pts/0   S+   22:16   0:00 perl t.pl

…開放してる