properly escape '$' in perl script

manbearian · dennisameling · commit cfde0baad080 · 2020-11-29T21:50:50.000+01:00
Signed-off-by: Dennis Ameling &lt;dennis@dennisameling.com&gt;
diff --git a/contrib/buildsystems/Generators/Vcxproj.pm b/contrib/buildsystems/Generators/Vcxproj.pm
@@ -195,7 +195,7 @@ EOM
     <PreBuildEvent Condition="!Exists('$cdup\\compat\\vcbuild\\vcpkg\\installed\\\$(VCPKGArch)\\include\\openssl\\ssl.h')">
       <Message>Initialize VCPKG</Message>
       <Command>del "$cdup\\compat\\vcbuild\\vcpkg"</Command>
-      <Command>call "$cdup\\compat\\vcbuild\\vcpkg_install.bat" $(VCPKGArch)</Command>
+      <Command>call "$cdup\\compat\\vcbuild\\vcpkg_install.bat" \$(VCPKGArch)</Command>
     </PreBuildEvent>
 EOM
     }

Original file line number	Diff line number	Diff line change
`@@ -195,7 +195,7 @@ EOM`
`195`	`195`	`<PreBuildEvent Condition="!Exists('$cdup\\compat\\vcbuild\\vcpkg\\installed\\\$(VCPKGArch)\\include\\openssl\\ssl.h')">`
`196`	`196`	`<Message>Initialize VCPKG</Message>`
`197`	`197`	`<Command>del "$cdup\\compat\\vcbuild\\vcpkg"</Command>`
`198`		`- <Command>call "$cdup\\compat\\vcbuild\\vcpkg_install.bat" $(VCPKGArch)</Command>`
	`198`	`+ <Command>call "$cdup\\compat\\vcbuild\\vcpkg_install.bat" \$(VCPKGArch)</Command>`
`199`	`199`	`</PreBuildEvent>`
`200`	`200`	`EOM`
`201`	`201`	`}`