いつきコンテンツ

ヘルプ

カウンター


2009-11-06 調子悪いぜよ……最悪

ついに休んだ。

PCは普通になった。

[巡回] うつらうららかさん所でインデックス

ほっぺについた残りカスが可愛いよ。

[情報] Firefox 3.5.5 リリース

セキュリティ修正は無し。

まぁアップデートしておきましょう。

[巡回] 変人窟さん所で「ゲームの体験版やデモって本当に効果があるの?」「君が望む永遠というゲームがありましてな…。」

あぁ、あれは体験版はイジメでしたなぁ。

[ネタ] オリコンデイリー6位スタートの新生fripSide「only my railgun」 日本橋でも壊滅

個数をつくって無くてオリコンに入らない説(笑)

[情報] 奈良先端大のIRCサーバ、撤去の見込み

IRCサーバ irc.nara.wide.ad.jp および irc6.nara.wide.ad.jp がついに撤去される見込み

あらら……

[日記][プログラム] ディレクトリ内の総ファイル数を求めるperlスクリプト

多分こんな感じ

#!/usr/bin/perl

$root = ".";
&files($root);

sub files{
my($dir) = @_;
local(*DIR);
my($cnt);
$cnt = 0;
opendir(DIR,$dir);
while($file = readdir(DIR)){
if ($file eq "." or $file eq ".."){ next; }
$cnt++;
if (-d "$dir/$file"){ &files("$dir/$file"); }
}
closedir(DIR);
printf "%10d %s\n",$cnt,$dir;
}

出てきた出力をファイルにとって置いて、sortってかければ大量にファイルを抱え込んでいるディレクトリが分かります(笑)

[日記][プログラム] カレントディレクトリのファイルサイズを求めるスクリプト

#!/usr/bin/perl

$size = 0;
opendir(DIR,".");
while($file = readdir(DIR)){
$size += (stat($file))[7];
}
closedir(DIR);
print $size;

こんな感じ。ディレクトリサイズも加算されるけど気にするな。

du -s .ってやると、メモリ不足だよウワーンって言われたので適当にでっち上げた。

[日記][プログラム] カレントディレクトリのファイルを全部削除するスクリプト

#!/usr/bin/perl

opendir(DIR,".");
while($file = readdir(DIR)){
if ($file eq "." or $file eq ".."){ next; }
print $file,"\n";
unlink($file);
}
closedir(DIR);

rm -Rf ./ってやると、メモリ不足だよウワーンって言われるので適当にでっち上げた。

いや、さっきから何してるかというと、あるディレクトリに、2,915,446ファイルあってな? ディレクトリのサイズ(ファイルサイズにあらず)が149,271,040byteで、中身が17,218,357,293Byteもあったのよ。

数年放置されていたqmailサーバのpostmasterな(笑) こんな酷いことに……。

FreeBSD 6.2+FFS2でディレクトリへの書き込みがメタクソ遅くなってなぁ……(そう言えばちょっと前に同じような現象を喰らったことがあるな(笑)ファイル数が多すぎてバックアップがタイムアウトするという……)

qmailの欠点……というか、Maildirの欠点ですな。ファイル作りすぎ。


余談:iusedも100%(ifreeが0)だったんだぜ?(笑)

Last Update: 2009-11-07 00:28:46

カレンダー

2003|04|10|11|12|
2004|01|02|03|04|05|06|07|08|09|10|11|12|
2005|01|02|03|04|05|06|07|08|09|10|11|12|
2006|01|02|03|04|05|06|07|08|09|10|11|12|
2007|01|02|03|04|05|06|07|08|09|10|11|12|
2008|01|02|03|04|05|06|07|08|09|10|11|12|
2009|01|02|03|04|05|06|07|08|09|10|11|12|
2010|01|02|03|04|05|06|07|08|09|10|11|12|
2011|01|02|03|04|05|06|07|08|09|10|11|12|
2012|01|02|03|04|05|07|08|11|
2013|03|05|08|
2014|01|
2015|04|05|06|07|09|10|12|
2016|01|03|05|06|10|11|
2017|06|
2018|05|08|09|10|11|
2019|04|08|12|
2020|03|08|09|11|
Generated by tDiary version 4.1.2 + amazon(DB Patch 0.2.1) + counter(DB Patch 0.2) + IKPatch version beta 4.0.1.
Powered by Ruby version 2.1.5-p273 with ruby-fcgi