http://qs321.pair.com?node_id=661381


in reply to Re: Avoid headaches from Strawberry Perl 5.10.0 and binary SVK
in thread Avoid headaches from Strawberry Perl 5.10.0 and binary SVK

Supposedly the .bat file resets the PATH afterwards -- but maybe it doesn't in some cases (non-zero exit?). Here's the original:

@echo off set APR_ICONV_PATH=C:\Program Files\svk\iconv set OLDPATH=%PATH% set PATH=C:\Program Files\svk\bin;%PATH% if "%OS%" == "Windows_NT" goto WinNT "C:\Program Files\svk\bin\perl" "C:\Program Files\svk\bin\svk" %1 %2 % +3 %4 %5 %6 %7 %8 %9 goto endofperl :WinNT "C:\Program Files\svk\bin\perl" "C:\Program Files\svk\bin\svk" %* if NOT "%COMSPEC%" == "%SystemRoot%\system32\cmd.exe" goto endofperl if %errorlevel% == 9009 echo You do not have SVK installed correctly. if errorlevel 1 goto script_failed_so_exit_with_non_zero_val 2>nul set PATH=%OLDPATH% set APR_ICONV_PATH=

-xdg

Code written by xdg and posted on PerlMonks is public domain. It is provided as is with no warranties, express or implied, of any kind. Posted code may not have been tested. Use of posted code is at your own risk.