| author | Heiko Schlittermann (JUMPER) <hs@schlittermann.de> | 
| Wed, 09 Apr 2014 16:15:26 +0200 | |
| changeset 7 | 30ae33129787 | 
| parent 6 | 363921354754 | 
| child 10 | 525ccdec5156 | 
| read-httpd-conf | file | annotate | diff | comparison | revisions | 
--- 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; }