for_flr

先列出接下来的几道题，有时间依次琢磨（题目挑选自本论坛批处理新手练功区）
10，获取当前目录路径
11，判断目录或文件是否存在
12，把文本的首行和尾行相拼接
13，过滤掉重复的行，然后保存到另一个文本文件
14，输入两个字母，显示它们之间的所有字母
15，字符串中的大小写互换
16，计算字符串长度
17，检查《千字文》是否有重复字
18，在控制台输出闪电图形

for_flr

第十，没啥好说的，用get-location，赋值到变量$a=get-location。

十一，批处理的if exist，powershell中有test-path,test-path还支持通配符

if (test-path .\*.mp3){write-host "当前目录有MP3文件"}else{write-host "无"}
复制代码

12,把文本首行和尾行相拼接。
批处理1

@echo off
setlocal enabledelayedexpansion
for /f "delims= " %%a in (a.txt) do (set/a num+=1&set !num!=%%a)
::对每一行依次赋值到数字序列
echo !1!!%num%!
复制代码

批处理2

@echo off
set /p a=<a.txt
::获取首行
for /f "delims=" %%i in (a.txt) do set b=%%i
::依次将行内容赋值到变量b,直到最后一行。
echo %a%%b%
pause>nul
复制代码

powershell
(get-content a.txt)[0,-1]  #文本内容视为数组，0是第一行，-1是最后一行。

(get-content a.txt)[0]+(get-content a.txt)[-1] #用+连接第一行和最后一行。
复制代码

for_flr

13，过滤掉重复的行，然后保存到另一个文本文件。假设有1.txt内容如下:

锄禾日当午
汗滴禾下土
锄禾日当午
锄禾日当午
谁知盘中餐
粒粒皆辛苦
白日依山尽
白日依山尽
白日依山尽
黄河入海流
粒粒皆辛苦
欲穷千里目
更上一层楼
更上一层楼
复制代码

批处理版：

@echo off
for /f "delims=" %%i in (1.txt) do (
    if not defined %%i set %%i=1&echo;%%i>>2.txt
)  
pause
复制代码

powershell中有select-object,选择一个对象或一组对象的指定属性。它还可以从对象的数组中选择唯一对象，也可以从对象数组的开头或末尾选择指定个数的对象。

get-content 1.txt|select-object -unique >2.txt
# -unique ，从字符数组中选择唯一字符，即去除重复
复制代码

get-process | sort-object -property WS | select-object -Last 5
#此命令显示占用内存最多的五个进程。Sort-Object 用于按内存（工作集）使用量对进程排序，Select-Object 用于只选择所得到的对象数组的最后五个成员。

for_flr

14题，要求：
    输入任意两个字母，显示这两个字母中间的所有字母。
如：  输入 af 则显示英文字母a至f  如： a  b c d e f
随风前辈批处理如下

@echo off
echo 请按先后顺序输入两个字母 如：af ，不能输入 fa
set /p input= 
cls
for %%b in (a b c d e f g h i j k l m n o p q r s t u v w x y z) do (
 if /i "%input:~0,1%"=="%%b" set ok=ok
 if /i "%input:~1,1%"=="%%b" set ok=&echo %%b
 if defined ok echo %%b
)
echo.&pause&exit
复制代码

::从a到z逐字判断是否等于输入的两个字母。

for_flr

powershell

$str="abcdefghijklmnopqrstuvwxyz"
$input=read-host "请输入两个字母"
$sp=$input.substring(0,1)+"|"+$input.substring(1,1)
($str -split "$sp")[1]
复制代码

#将输入的字母视作分隔符，把字母表分割成3段，显示第二段。
-split的分割用法：
"张三-23-男-法外狂徒" -split "-"
我好傻，第三行应该用.insert()或者.chars()

——————————
根据24楼WHY前辈指点，可以简化为

$s = 'abcdefghijklmnopqrstuvwxyz';
$a = Read-Host '请输入两个字母';
$s.Split($a)[1]
复制代码

而本人原答案中，
只知道-split 如果指定多个分隔符，应该用|符号隔开，如： "a|b"
所以用$sp=$input.substring(0,1)+"|"+$input.substring(1,1) 构建 a|b，徒增笑尔。

for_flr

15题，字符串中大小写互换
批处理1

@echo off
set "letters= abcdefghijklmnopqrstuvwxyzZYXWVUTSRQPONMLKJIHGFEDCBA"
for /l %%a in (1,1,26) do call set /a "_%%letters:~%%a,1%%=%%a"
:input
setlocal EnableDelayedExpansion
echo 请输入:&set /p var=&if not defined var endlocal&goto:input
:loop
set char=!var:~%pi%,1!
set /a sn=_!char! 2>nul||set sn=0
if defined char (
    if %sn% gtr 0 (
        if "!char!"=="!letters:~%sn%,1!" (set str=!str!!letters:~-%sn%,1!) else (set str=!str!!letters:~%sn%,1!)
    ) else (
        set str=!str!!char!
    )
    set /a pi+=1
    goto loop
)
echo=!str!
pause&endlocal&goto input
复制代码

批处理2

@echo off & setlocal enabledelayedexpansion
(for %%a in (a_A b_B c_C d_D e_E f_F g_G h_H i_I j_J k_K l_L m_M n_N o_O p_P q_Q r_R s_S t_T u_U v_V w_W x_X y_Y z_Z A_a B_b C_c D_d E_e F_f G_g H_h I_i J_j K_k L_l M_m N_n O_o P_p Q_q R_r S_s T_t U_u V_v W_w X_x Y_y Z_z) do echo;%%a)>temp.txt
:loop
cls&echo;输入混杂大小写的字母串(不超过15位)&set /p var=
for /l %%b in (0,1,15) do (
	set "zifu=!var:~%%b,1!"
	if "!zifu!"=="" pause>nul&goto loop
	for /f "tokens=2 delims=_" %%c in ('findstr /b "!zifu!" temp.txt') do set /p=%%c<nul
)
pause&goto loop
复制代码

for_flr

powershell
接触了foreach和split，字符串的.toupper()、.tolower()
那这题就太简单了
将字符串拆分成单子，逐字对比判断字符是大写还是小写，再转化

$a="abcdABCD 123 XyZ"
$a -split ""|foreach{if ($_ -ceq $_.tolower()){$na+=$_.toupper()}else{$na+=$_.tolower()}}
$na
复制代码

powershell果然机具power！！
注： if 中的 eq代表等于，ceq代表等于且区分大小写

WHY

回复 20# for_flr

$s = 'abcdefghijklmnopqrstuvwxyz';
$a = Read-Host '请输入两个字母';
$s.Split($a)[1]
复制代码

$a = read-host "请输入两个字母";
[char[]](([int]$a[0]+1)..([int]$a[1]-1));
复制代码

for_flr

16计算字符串长度
批处理

@echo off
set str=123ABC上中下
:loop
set /a a+=1
set str=%str:~0,-1%
if "%str%"=="" (echo %a%&pause>nul ) else goto loop
复制代码

powershell

$str="123ABC上中下"
$str.length
复制代码

for_flr

17,检查千字文是否有重复字，且统计千字文文字数量，且将四字词语逆序输出。
http://www.bathome.net/thread-12590-1-2.html
批处理代码不贴了，都在帖子里。
（题目作者很鸡贼，在txt末尾加了两个空行，其中一个空行里有个空格键.）

for_flr

第17，关于千字文的3个问题，
1，统计千字文数量，不含空格，共一千字。

Get-Content 千字文.txt|foreach {$num+=($_.replace(" ","")).length}
$num
#去除每一行的空格后，累加文字长度
复制代码

坐等更效率的处理方式
2四字词语倒序输出

get-content 千字文.txt|foreach {$new+=$_.split()}
($new)[-1..-$new.count]
#将千字文逐行分成6个四字词语，累计存到变量new里，$new.count=588（含空行588行）
#最后用数组的[-1..-588]形式，完成倒序输出
复制代码

视觉效果不理想，有空白行干扰
3，统计文中的重复字，暂无满意办法...

for_flr

18，输出类似的闪电图形

@echo off&setlocal enabledelayedexpansion
for /l %%a in (1 1 11) do set "空格=!空格! "&set "星号=!星号!*"
for /l %%a in (1 1 10) do echo !空格:~%%a!!空格:~%%a!!星号:~,%%a!
for /l %%a in (10 -1 1) do echo !空格:~-%%a!!星号:~-%%a!
pause
复制代码

powershell

$a="*"
for ($i=40;$i -ge 20;$i-=2){"{0,$i}" -f $a;$a=$a+"*"}
for ($i=30;$i -ge 8;$i-=2){"{0,$i}" -f $a;$a=$a.remove(0,1)}
复制代码

心远先生

回复 8# for_flr


    bathome写成hathome，新手看不懂容易误会，纠正下

for_flr

回复 28# 心远先生


    已改正，谢谢提醒。
另，借本楼贴出[system.io.path]的学习记录。
坛友提问：如何使用Powershell 将一个文件复制10份,文件名加后缀从1递增到10，如a.txt，复制出a1.txt，a2.txt到a10.txt

$a="a.txt"
for ($i=1;$i -le 10;$i++){copy $a (dir $a).name.insert(1,$i)}
复制代码

这样写不通用，搜索了一会儿，看到[system.io.path]::getxxx的用法，记录如下：

$filename="test.mp3"
$n=10
$fn=[system.io.path]::getfilenamewithoutextension($filename)
$fx=[system.io.path]::getextension($filename)
for ($i=1;$i -le $n;$i++){copy-item $filename $fn$i$fx}
复制代码

[system.io.path]::getfilename() #获取文件名
[system.io.path]::getfilenamewithoutextension() #获取文件名，不含后缀
[system.io.path]::getextension() #获取文件后缀名
[system.io.path]::getfullpath() #获取全路径且带文件全名
[system.io.path]::getdirectoryname() #获取文件父目录名   （括号里的文件名需要带绝对路径）
[system.io.path]::getpathroot() #获取文件所在盘符        （括号里的文件名需要带绝对路径）
复制代码

不知道这种用法叫什么名字，不知道还有没有其他的，希望路过的大佬补充一下

for_flr

练一道题，第19，把每行中等于8个字符的字符串提取出来，其他行过滤掉。
示例文本 a.txt

12345678 abc cde
批处理之家
一二三四五六七八  abcdefgh
新手练功区欢迎大家
复制代码

其实字符串长度题目重复了，这里主要是套用两个foreach循环，练一练：

$file=1.txt
get-content $file|foreach{
    foreach ($s in $_.split()) {
    if ($s.length -eq 8) {$s}
    }
}
复制代码