fixed: full dump of no previous was found v 0.2
authorHeiko Schlittermann <hs@schlittermann.de>
Sun, 22 Nov 2009 23:43:00 +0100
changeset 12 54c5b5ab39cb
parent 11 a0d340ff424b
child 13 19a406395e1c
fixed: full dump of no previous was found
ftbackup
--- a/ftbackup	Sat Nov 21 22:08:41 2009 +0100
+++ b/ftbackup	Sun Nov 22 23:43:00 2009 +0100
@@ -201,7 +201,8 @@
     $_ = (grep /device.mapper/, slurp("/proc/devices"))[0]
 	and $dev_mapper = (split)[0];
 
-    foreach (slurp("/etc/fstab")) {
+    # find all non comment lines
+    foreach (grep !/^\s*#/, slurp("/etc/fstab")) {
 	my ($dev, $mp, $fstype, $options, $dump, $check)
 	    = split;
 	next if not $dump;
@@ -302,6 +303,7 @@
 }
 
 sub iso2epoch($) {
+    return 0 if not $_[0];
     $_[0] =~ /(?<year>\d+)\D(?<mon>\d+)\D(?<mday>\d+)
 	      (?:\D(?<hour>\d\d)\D(?<min>\d\d)(?:\D(?<sec>\d\d))?)?/x;
     my %iso = ((sec => 0, min => 0, hour => 0), %+);