bin/imager.fuse
changeset 115 0d4074ac2eee
parent 74 a8495233e04c
child 118 8c2cc26d45fc
--- a/bin/imager.fuse	Mon Jun 18 13:52:20 2012 +0200
+++ b/bin/imager.fuse	Mon Jun 18 14:36:13 2012 +0200
@@ -273,8 +273,12 @@
         open(my $fh => $path);
         while (<$fh>) {
             last if /^$/;
-            /^(?<k>\S+):\s+(?<v>.*?)\s*$/
-              and do { $meta{ $+{k} } = $+{v}; next; };
+            /^(?<k>\S+):\s+(?:(?<n>\d+)|(?<v>.*?))\s*$/
+              and do { 
+	      	# na sowas, die Zeitstempel dürfen nicht als Zeichenkette reinkommen!
+	      	$meta{ $+{k} } = defined $+{n} ? (0+$+{n}) : $+{v};
+		next; 
+	      };
         }
         return %meta;
     }