changeset 21 | f47d0026ab09 |
parent 19 | f741b1822a02 |
child 22 | 91803f1e2741 |
--- a/exigrey.pl Tue Jan 02 23:06:06 2007 +0000 +++ b/exigrey.pl Tue Jan 02 23:15:14 2007 +0000 @@ -81,14 +81,15 @@ $_ = <<__; date: %s - db: $db (%.1f MB) + db: $db (ls: %.1f MB / du: %.1f MB) total: $seen not returned: %d (%d%%) oldest: %.1f days (%s) __ printf $_, scalar(localtime), - -s $db / (1024*1024), + (-s $db) / (1024*1024), + ((stat $db)[12]*512)/(1024*1024), $seen - $returned, int(100 * ($seen-$returned)/$seen), ((time - $oldest) / 86400), scalar(localtime $oldest);