fixed warnings if ftp answer contains . and ..
--- a/.hgignore Tue Dec 29 22:42:45 2009 +0100
+++ b/.hgignore Fri Apr 08 10:41:24 2011 +0200
@@ -4,3 +4,4 @@
debian/*
ftbackup.8
debian/files
+Makefile
--- a/Makefile Tue Dec 29 22:42:45 2009 +0100
+++ /dev/null Thu Jan 01 00:00:00 1970 +0000
@@ -1,30 +0,0 @@
-DESTDIR =
-prefix = /usr
-sbindir = ${prefix}/sbin
-man8dir = ${prefix}/share/man/man8
-
-SCRIPT = ftbackup
-MAN8PAGE = ftbackup.8
-
-all:
-
-
-install: man all
- install -d -m 0755 ${DESTDIR}${sbindir}
- install -m 0755 ${SCRIPT} ${DESTDIR}${sbindir}
-
- install -d -m 0755 ${DESTDIR}${man8dir}
- install -m 0644 ${MAN8PAGE} ${DESTDIR}${man8dir}/
-
-
-
-man: ${MAN8PAGE}
-
-clean:
- rm -f ${MAN8PAGE}
-
-distclean: clean
- rm -f Makefile
-
-%.8: %
- pod2man --section 8 $< >$@
--- a/ftbackup Tue Dec 29 22:42:45 2009 +0100
+++ b/ftbackup Fri Apr 08 10:41:24 2011 +0200
@@ -110,7 +110,7 @@
# FIXME: currently we simply run a full dump every FULL_CYCLE
# days, the intermediate dumps are level 1
foreach (reverse sort $ftp->ls) {
- /^(?<date>.*)\.(?<level>\d+)$/;
+ /^(?<date>.*)\.(?<level>\d+)$/ or next;
$last[$+{level}] = $+{date};
last if $+{level} == 0;
}