【练习-050】批处理超越for命令tokens极限分割字符串

Seter

昏...我的思路和BATMAN一样的...居然没想到用for的1*....

Lumiere

第一个跑后面是因为你的代码有个小错误，显示结果只不过是乱打正着。批处理预处理的时候你的f定义"set f=%f:+=&echo %" 被解释为“set f=d_q 973 & echo c_j 314........”所以你的显示结果其实是从这一句就开始了，而不是最后一个命令%f%。最后一个%f%其实显示的就是第一节。
整个代码如果要完美应该改成

1. @echo off
   
2. set /p f=<1.txt
   
3. set f=%f:-=+%
   
4. set f=%f:+=^&echo %
   
5. echo %f%
   
6. pause

复制代码

这样的话&可以在最后一个echo的时候经过预处理解释成连接符，而不会在第三句的时候就被解释成连接符。

Lumiere

我首先想到的就是这个方法，以前替换文本中的等号=的时候用过。呵呵，看样子出差三天论坛上我错过了不少好戏啊……

rat

1. @echo off & setlocal
   
2. set s=d_q 973-c_j 314+y_d 356+i_p 638-u_m 204+w_a 588+j_c 829-p_t 599+j_v 803-p_y 92-r_h 677+h_i 341+h_q 705-r_f 601-m_s 822+q_q 17-w_y 720+s_d 325-d_n 559-l_s 109+l_v 160-x_b 232-u_r 282-v_l 521+p_o 403-x_n 613+t_x 185-g_v 678+z_n 753+j_k 779-o_f 283-h_w 390-z_o 772-w_v 252-a_e 51-m_t 945-k_q 444-r_m 233-p_w 744+k_k 136-w_k 131-s_o 163+k_i 733+w_c 733+g_l 42+o_i 515+x_h 130-n_b 200+i_u 25+z_i 730
   
3. set s=%s:+=-%
   
4. setlocal enabledelayedexpansion
   
5. set s=!s:-=^
   
6. 
   
7. !
   
8. echo !s!
   
9. endlocal
   
10. pause>nul

复制代码

FOR

1. 
   
2. @echo off
   
3. set s=d_q 973-c_j 314+y_d 356+i_p 638-u_m 204+w_a 588+j_c 829-p_t 599+j_v 803-p_y 92-r_h
   
4. 677+h_i 341+h_q 705-r_f 601-m_s 822+q_q 17-w_y 720+s_d 325-d_n 559-l_s 109+l_v 160-x_b 232-
   
5. u_r 282-v_l 521+p_o 403-x_n 613+t_x 185-g_v 678+z_n 753+j_k 779-o_f 283-h_w 390-z_o 772-w_v
   
6. 252-a_e 51-m_t 945-k_q 444-r_m 233-p_w 744+k_k 136-w_k 131-s_o 163+k_i 733+w_c 733+g_l
   
7. 42+o_i 515+x_h 130-n_b 200+i_u 25+z_i 730
   
8. set s=%s:+=-%
   
9. set "s=echo %s:-=&echo;%"
   
10. %s%
    
11. pause
    

复制代码

lt5

1. @echo off&setlocal enabledelayedexpansion
   
2. set "f=d_q 973-c_j 314+y_d 356+i_p 638-u_m 204+w_a 588+j_c 829-p_t 599+j_v 803-p_y 92-r_h 677+h_i 341+h_q 705-r_f 601-m_s 822+q_q17-w_y 720+s_d 325-d_n 559-l_s 109+l_v 160-x_b 232-u_r 282-v_l 521+p_o 403-x_n 613+t_x 185-g_v678+z_n 753+j_k 779-o_f 283-h_w 390-z_o 772-w_v 252-a_e 51-m_t 945-k_q 444-r_m 233-p_w 744+k_k 136-w_k 131-s_o 163+k_i 733+w_c 733+g_l 42+o_i 515+x_h 130-n_b 200+i_u 25+z_i 730"
   
3. set str=%f:+=-%
   
4. set i=^
   
5. 
   
6. 
   
7. for %%a in ("!i!") do (
   
8.    for /f "delims=" %%b in ("!str:-=%%~a!") do echo %%b
   
9. )
   
10. pause>nul

复制代码

上面的代码看似复杂，其实思路很简单，就是把分隔符替换成换行符，就像word一样。只用set的话无法把所有结果输入到文本文件，因为set默认是只取最后一行。
还有下面的虽然用了很多set，但为了能输入到文本里不得不用for循环，有没有不用for循环也能把结果输入到文本呢？

1. @echo off&setlocal enabledelayedexpansion
   
2. set "str=d_q 973-c_j 314+y_d 356+i_p 638-u_m 204+w_a 588+j_c 829-p_t 599+j_v 803-p_y 92-r_h 677+h_i 341+h_q 705-r_f 601-m_s 822+q_q17-w_y 720+s_d 325-d_n 559-l_s 109+l_v 160-x_b 232-u_r 282-v_l 521+p_o 403-x_n 613+t_x 185-g_v678+z_n 753+j_k 779-o_f 283-h_w 390-z_o 772-w_v 252-a_e 51-m_t 945-k_q 444-r_m 233-p_w 744+k_k 136-w_k 131-s_o 163+k_i 733+w_c 733+g_l 42+o_i 515+x_h 130-n_b 200+i_u 25+z_i 730"
   
3. 
   
4. set str=%str: =#%
   
5. set str=%str:+= %
   
6. set str=%str:-=;%
   
7. for %%i in (%str%) do (set a=%%i
   
8. echo !a:#= !)
   
9. pause>nul

复制代码

lt5

1. @echo off
   
2. set "f=d_q 973-c_j 314+y_d 356+i_p 638-u_m 204+w_a 588+j_c 829-p_t 599+j_v 803-p_y 92-r_h 677+h_i 341+h_q 705-r_f 601-m_s 822+q_q17-w_y 720+s_d 325-d_n 559-l_s 109+l_v 160-x_b 232-u_r 282-v_l 521+p_o 403-x_n 613+t_x 185-g_v678+z_n 753+j_k 779-o_f 283-h_w 390-z_o 772-w_v 252-a_e 51-m_t 945-k_q 444-r_m 233-p_w 744+k_k 136-w_k 131-s_o 163+k_i 733+w_c 733+g_l 42+o_i 515+x_h 130-n_b 200+i_u 25+z_i 730"
   
3. set f=+%f:-=+%
   
4. set f=%f:+=>>test.x &echo %
   
5. type test.x
   
6. pause

复制代码

感觉还是batman的方法通用一些，后来的方法都是找到了这段文字的规律而已，所以代码显得很简洁。若是遇到其他文字这个方法可能就没用了

zhyoli

新手学习。。。收到！

zhyoli

都是高手，我来学习的。

luonanyun

回复 15# batman

1. 
   
2. set "str=d_q 973-c_j 314+y_d 356+i_p 638-u_m 204+w_a 588+j_c 829-p_t 599+j_v 803-p_y 92-r_h 677+h_i 341+h_q 705-r_f 601-m_s 822+q_q17-w_y 720+s_d 325-d_n 559-l_s 109+l_v 160-x_b 232-u_r 282-v_l 521+p_o 403-x_n 613+t_x 185-g_v678+z_n 753+j_k 779-o_f 283-h_w 390-z_o 772-w_v 252-a_e 51-m_t 945-k_q 444-r_m 233-p_w 744+k_k 136-w_k 131-s_o 163+k_i 733+w_c 733+g_l 42+o_i 515+x_h 130-n_b 200+i_u 25+z_i 730"
   
3. 
   
4. 
   
5.    

复制代码

刚才试了一下  好像这段不加引号也是可以的，加了和不加到底有什么区别啊？ 求指教！！！

jains521

谁有我简洁 连for也省了..............
不过爆出一个我想不通的问题 问什么第一个会到最后去呢？？
保存那 ...
基拉freedom 发表于 2009-8-12 22:23

    为什么第一个会到最后一个去, 是因为第一个的前面没有+-符号,你用符号替换的时候. 第一个自然就 不会被处理了.所以.你就在最后加上了.echo %f%.

   解决的方法就是在 在行首位置添加一个+-符号..

a5321

厉害啊 谢谢分享了

qixiaobin0715

出题出的好，答题答的妙！！！

tiandyoin

回复 12# 基拉freedom

1.   @echo off&setlocal EnableDelayedExpansion
   
2.   set token=
   
3.   set "f=0\1\2\3\4\5\6\7\8\9\a^^^^^^^^a%%TEMP%%^^|^^&^^>^^|^^^^^!temp^^^^^!"
   
4.   set "f=!f:\=&set token=!"
   
5.   set "f=set token=!f!"
   
6.   %f%
   
7.   set token
   
8.   ::取最后一个token（使用 !f! 不会求值；%f%: 对于特殊字符，要多重转义）
   
9.   ::Output: token=a^a%TEMP%|&>|!temp!

复制代码

aloha20200628

重温2009年的这枚老帖，眼前犹如一幅 '众酒友猜拳行令' 的热闹景象，眼下论坛已难有如此 '豪情' 了... 弹指到今时，也来敬一杯迟到的酒吧...

1. @echo off & set "s=d_q 973-c_j 314+y_d 356+i_p 638-u_m 204+w_a 588+j_c 829-p_t 599+j_v 803-p_y 92-r_h 677+h_i 341+h_q 705-r_f 601-m_s 822+q_q 17-w_y 720+s_d 325-d_n 559-l_s 109+l_v 160-x_b 232-u_r 282-v_l 521+p_o 403-x_n 613+t_x 185-g_v678+z_n 753+j_k 779-o_f 283-h_w 390-z_o 772-w_v 252-a_e 51-m_t 945-k_q 444-r_m 233-p_w 744+k_k 136-w_k 131-s_o 163+k_i733+w_c 733+g_l 42+o_i 515+x_h 130-n_b 200+i_u 25+z_i 730"
   
2.    set "s=%s:+=;%" &call set "s=%%s:-=;%%"
   
3.    for %%c in (%s: =/%) do (set "v=%%c" &call echo,%%v:/= %%)
   
4. pause&exit/b

复制代码

以上代码将源字符串 %s% 中的 +- 替换为 for...() 默认的分隔符 ; 或 , 或 = 或跳格均可。
顺便也附上仅用一行可解的 powershell 代码如下（其中变量 %s% 如上）

1. powershell "'%s%'.split('+|-')"

复制代码