标题: [文本处理] 统计文本文件中mp3出现的次数 [打印本页]
作者: netdzb 时间: 2020-6-18 23:14 标题: 统计文本文件中mp3出现的次数
python是可以实现的,批处理能够做到吗?
作者: wujunkai 时间: 2020-6-19 18:13
本帖最后由 wujunkai 于 2020-6-20 13:47 编辑
- @echo off & setlocal enabledelayedexpansion
-
- :main
- set count=0
- call:fopen one.txt text
- set /A lines=fopen_len-1
- for /L %%i in (0,1,%lines%) do (
- call:len text[%%i]
- call:deal %%i
- )
- echo %count%
- pause
- goto:eof
-
- :deal
- set word=!text[%~1]!
- set /A len-=2
- for /L %%i in (0,1,%len%) do if /I "!word:~%%i,3!"=="mp3" set /A count+=1
- goto:eof
-
- :len
- set len_cpy=!%~1!
- set len=0
- for %%i in (1024,512,256,128,64,32,16,8,4,2,1) do if not "!len_cpy:~%%i,1!"=="" (
- set /A len+=%%i
- set len_cpy=!len_cpy:~%%i!
- )
- goto:eof
-
- :fopen
- set fopen_file=%~1
- if "%~2"=="" ( set "fopen_vale=%~n1" ) else ( set "fopen_vale=%~2" )
- set fopen_len=0
- for /F "tokens=1* delims=:" %%i in ('findstr /n .* %fopen_file%') do (
- set %fopen_vale%[!fopen_len!]=%%j
- set /A fopen_len+=1
- )
- goto:eof
复制代码
作者: went 时间: 2020-6-19 21:01
批处理够呛,ps简单- @echo off
- set "file=C:\Users\lenovo\Desktop\1.txt"
- set "key=mp3"
- powershell -c "[System.Text.RegularExpressions.Regex]::Matches((Get-Content '%file%' | Out-String),'%key%').Count"
- pause&exit
复制代码
作者: netdzb 时间: 2020-6-19 21:51
回复 2# wujunkai
批处理怎么做啊,python是分分钟钟的事情。
作者: wujunkai 时间: 2020-6-20 13:48
回复 4# netdzb
是挺呛的,不过bat的思路其实和C++差不多
欢迎光临 批处理之家 (http://www.bathome.net/) |
Powered by Discuz! 7.2 |