+delete_older_than='-7 days'
+ext=tar.gz
+
+# Obtengo fechas
+fecha=`date +'%Y%m%d'`
+fecha_old=`date +'%Y%m%d' -d "$delete_older_than"`
+# funcion que borra archivos más viejos de lo deseado.
+delete_old_files() {
+ for f in `ls $dir`; do
+ if (echo $f | egrep -q "[0-9]{8}.$ext"); then
+ f_fecha=`echo $f | sed s/'\\([0-9]\\{8\\}\\)'."$ext"/'\1'/`
+ if ((f_fecha<=fecha_old)); then
+ rm -f "$dir/$f"
+ fi
+ fi
+ done
+}