wok-next view zerobin/stuff/purge.sh @ rev 17674

tix: tcl 8.6 support
author Pascal Bellard <pascal.bellard@slitaz.org>
date Wed Feb 18 11:02:05 2015 +0100 (2015-02-18)
parents
children
line source
1 #!/bin/sh
2
3 cd $(dirname $0)
4 for i in ?? ; do
5 for j in $i/?? ; do
6 for k in $j/* ; do
7 [ -f $k ] || continue
8 grep -qs '"expire_date":' $k || continue
9 [ $(sed 's/.*"expire_date":\([0-9]*\).*/\1/' $k) -lt \
10 $(date +%s) ] && rm -rf $k*
11 done
12 rmdir $j 2> /dev/null
13 done
14 rmdir $i 2> /dev/null
15 done