[文件操作] [已解决]求助批处理双变量同时包含!和%的输出

kingshui

有一test1文件包含以下内容(文件名及路径)

X:\require\https%3A%2F%2Fgithub.com
X:\require\!test.com
复制代码

想要输出成如下(test2)的内容:

"X:\require\https%3A%2F%2Fgithub.com" "\https%3A%2F%2Fgithub.com"
"X:\require\!test.com" "\!test.com"
复制代码

已经作出如下代码:

For /f "delims=" %%i In (test1) Do (
Echo "%%i" "%~nxi">>test2
)
复制代码

想了一些法子,都无法同时支持!和%的输出...
望指点,变量延迟用怕了.
这是完整一点的

:package
if "%~1" NEQ "" (
	echo %~1 >>patch
	if "%~2" NEQ "" echo %~2 >>patch
	if "%~3" NEQ "" echo %~3 >>patch
	if "%~4" NEQ "" echo %~4 >>patch
	if "%~5" NEQ "" echo %~5 >>patch
	if "%~6" NEQ "" echo %~6 >>patch
	if "%~7" NEQ "" echo %~7 >>patch
	if "%~8" NEQ "" echo %~8 >>patch
	if "%~9" NEQ "" echo %~9 >>patch
	call :packagemod
	)
:packagemod
SETLOCAL ENABLEDELAYEDEXPANSION
set cmdstr=MAKECAB /v3 /D CompressionType=LZX /D CompressionMemory=21 /D MaxDiskSize=CDROM /D Cabinet=On /D Compress=On /D FolderSizeThreshold=5000000 /D DiskDirectoryTemplate="%~dp1." /D CabinetNameTemplate="Por54_Profiles.CAB"
if exist cabstr del cabstr >nul
for /f "delims=" %%i in (patch) do (
	set fullname=%%i
	set "fullname=!fullname:~0,-1!"
	if exist "!fullname!\" (
		for /f "delims=" %%a in ('dir "!fullname!" /s /b /a-d') do (
			SETLOCAL DISABLEDELAYEDEXPANSION
			call set "fn=%%~nxa"
			call set "fp1=%%a"
			call set "fp=%%~dpa"
			SETLOCAL ENABLEDELAYEDEXPANSION			
			call set "fpr=%~dp0"
			call set fp=%%fp:!fpr!=%%
			call echo "%%fp1%%" "!fp!%%fn%%">>cabstr
			ENDLOCAL
			ENDLOCAL
			)
		) else (
		echo "%%i" "%%~nxi">>cabstr
		)
	)
%cmdstr% /F cabstr
复制代码

我大概是想疯了....

CrLf

回复 15# kingshui


    括号代表复合语句，预处理时会把 %var% 先解释成字符串，而 !var! 则留到命令实际执行前夕再临时解释，用 call 的目的是避免 %var% 位于复合语句中

kingshui

回复 14# Batcher


    多谢您的帮助，看明白了*号了，那么关于小括号的那一个个人理解的说法有解释吗？谢谢。

Batcher

回复 13# kingshui


看帮助文档：
Environment variable substitution has been enhanced as follows:

    %PATH:str1=str2%

would expand the PATH environment variable, substituting each occurrence
of "str1" in the expanded result with "str2".  "str2" can be the empty
string to effectively delete all occurrences of "str1" from the expanded
output.  "str1" can begin with an asterisk, in which case it will match
everything from the beginning of the expanded output to the first
occurrence of the remaining portion of str1.

kingshui

回复 12# CrLf


    非常感谢，已经成功了，关于兄的代码有两处不明白，能否指点下？

1）

(for /f "delims=" %%a in (cabstr) do (
   set "str=%%a"
   call :fun
))>b.txt
复制代码

此处的call为什么不能以小括号包含的方式来处理？如：

(for /f "delims=" %%a in (cabstr) do (
   set "str=%%a"
   (
		set "str=%str:!=|%"
		setlocal enabledelayedexpansion
		set str="!str!" "!str:*%key%=!"
		endlocal&echo %str:|=!%
	)
))>b.txt
复制代码

2）另一个就是在此处

set str="!str!" "!str:*%key%=!"
复制代码

这个"*"星号的作用是什么？如果有资料的话能否提供个链接学习下？
谢谢，真的非常感谢。

CrLf

@echo off
set "key=X:\require\test\"
set "key=%key:!=|%"
(for /f "delims=" %%a in (a.txt) do (
   set "str=%%a"
   call :fun
))>b.txt
pause&exit

:fun
set "str=%str:!=|%"
setlocal enabledelayedexpansion
set str="!str!" "!str:*%key%=!"
endlocal&echo %str:|=!%
复制代码

terse

回复 10# kingshui
那4楼代码 5行 这样的意思吗

echo "!str!" "!str:%~dp0=!"
复制代码

kingshui

回复 7# terse


    是%~dp0
谢谢。

kingshui

回复 8# CrLf


    测试了下。最后的输出！还是转义之后的|并没有再转义回！。

CrLf

回复 6# kingshui

@echo off
set "key=X:\require\test\"
set "key=%key:!=|%"
(for /f "delims=" %%a in (a.txt) do (
   set str=%%a
   call set "str=%%str:!=|%%"
   setlocal enabledelayedexpansion
   echo "!str!" "!str:*%key%=!"
   endlocal
   call set "str=%%str:|=!%%"
))>b.txt
pause
复制代码

terse

这里的变量是那里来   当前路径吗

kingshui

回复 4# CrLf


    非常感谢你的深夜回复，第三方的话是不考虑的了。

    @echo off
    (for /f "delims=" %%a in (a.txt) do (
       set str=%%a
       setlocal enabledelayedexpansion
       echo "!str!" "!str:*:\require\test\=!"
       endlocal
    ))>b.txt
    pause
复制代码

我一直纽结在

echo "!str!" "!str:*:\require\test\=!"
复制代码

这里，如果把*:\require\test\改为变量的话就始终不能同时处理了。实在不行的话就只能处理掉这两个符号了。cab压缩是个麻烦事啊。

CrLf

或用第三方 sed：

@sed "s/^.:\\require\\test\\\(.*\)/\x22&\x22 \x22\1\x22/" a.txt>b.txt
复制代码

CrLf

@echo off
(for /f "delims=" %%a in (a.txt) do (
   set str=%%a
   setlocal enabledelayedexpansion
   echo "!str!" "!str:*:\require\test\=!"
   endlocal
))>b.txt
pause
复制代码

kingshui

回复 2# CrLf


    我晕了...
我弄个简单的路径了...变成这样就不懂了.

X:\require\test\test2\https%3A%2F%2Fgithub.com
X:\require\test\!test.com
复制代码

截取了前面的X:\require\test\
变成这样:

"X:\require\test\test2\https%3A%2F%2Fgithub.com" "test2\https%3A%2F%2Fgithub.com
"X:\require\test\!test.com" "!test.com"
复制代码

代码就不会写了.....