continuation lines
authorHeiko Schlittermann (JUMPER) <hs@schlittermann.de>
Wed, 09 Apr 2014 16:15:26 +0200
changeset 7 30ae33129787
parent 6 363921354754
child 10 525ccdec5156
continuation lines
read-httpd-conf
--- a/read-httpd-conf	Wed Apr 09 16:15:12 2014 +0200
+++ b/read-httpd-conf	Wed Apr 09 16:15:26 2014 +0200
@@ -18,7 +18,11 @@
             $file = $+{file} =~ m{^/} ? $file : "$basedir/$file";
             say "# $. $file INCLUDE $file";
             read_file($_, $basedir) foreach (glob -d $file ? "$file/*" : $file);
-            next;
+        }
+        if (s{\\$}{}) {
+            chomp;
+            $_ .= <$fh>;
+            redo;
         }
         print;
     }