equal
deleted
inserted
replaced
79 $oldest = $v0 if $v0 < $oldest; |
79 $oldest = $v0 if $v0 < $oldest; |
80 }); |
80 }); |
81 |
81 |
82 $_ = <<__; |
82 $_ = <<__; |
83 date: %s |
83 date: %s |
84 db: $db (%.1f MB) |
84 db: $db (ls: %.1f MB / du: %.1f MB) |
85 total: $seen |
85 total: $seen |
86 not returned: %d (%d%%) |
86 not returned: %d (%d%%) |
87 oldest: %.1f days (%s) |
87 oldest: %.1f days (%s) |
88 __ |
88 __ |
89 printf $_, |
89 printf $_, |
90 scalar(localtime), |
90 scalar(localtime), |
91 -s $db / (1024*1024), |
91 (-s $db) / (1024*1024), |
|
92 ((stat $db)[12]*512)/(1024*1024), |
92 $seen - $returned, |
93 $seen - $returned, |
93 int(100 * ($seen-$returned)/$seen), |
94 int(100 * ($seen-$returned)/$seen), |
94 ((time - $oldest) / 86400), scalar(localtime $oldest); |
95 ((time - $oldest) / 86400), scalar(localtime $oldest); |
95 |
96 |
96 exit 0; |
97 exit 0; |