--- 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), %+);