From 327df2a086f09dea84353e0b5b5a82ac3fd0b053 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Tue, 23 Apr 2013 04:20:29 +0000 Subject: log substitions in verbose mode needed in order to pinpoint & fix: Backslash found where operator expected at -e line 2, near ";}continue{print or die qq(-p destination: $!\" (Missing operator before \?) Final $ should be \$ or $name at -e line 1, within string syntax error at -e line 2, near ";}continue{print or die qq(-p destination: $!" (Might be a runaway multi-line !! string starting on line 1) Execution of -e aborted due to compilation errors. (see next commit) --- tools/install-xml-file-list | 1 + 1 file changed, 1 insertion(+) (limited to 'tools') diff --git a/tools/install-xml-file-list b/tools/install-xml-file-list index 56b7a0a4f..42a567ef5 100755 --- a/tools/install-xml-file-list +++ b/tools/install-xml-file-list @@ -353,6 +353,7 @@ sub apply_filter { @l = grep { ! -d $_ } @l or next; if (my $subst = $filter->{subst}) { + warn "running substition $subst \n" if $verbose; system('perl', '-pi', '-e', $subst, @l); } if (my $command = $filter->{command}) { -- cgit v1.2.1