求助批处理如何统计一篇英文中每个词汇出现的次数

bfd2138

一篇英文txt文本，每个单词都是用空格隔开，没有标点符号，求个批处理能列出这篇文章出现了多少单词，并每个单词出现的次数？

比如 I love you but you do not love me 这句

运行后出现

I 1
love 2
you 2
but 1
do 1
not 1
me 1

tmplinshi

1. @echo off
   
2. 
   
3. setlocal
   
4. 
   
5. :: ================ 清空以 $ 开头的变量
   
6.         for /f "delims==" %%a in ('set $ 2^>nul') do (
   
7.                 set %%a=
   
8.         )
   
9. 
   
10. :: ================ 统计每个单词出现次数
    
11.         for /f "usebackq tokens=*" %%a in ("a.txt") do (
    
12.                 for %%i in (%%a) do (
    
13.                         set /a $%%i += 1
    
14.                 )
    
15.         )
    
16. 
    
17. :: ================ 输出结果
    
18.         (
    
19.                 for /f "tokens=1,2 delims=$=" %%a in (' set $ ') do (
    
20.                         echo %%a %%b
    
21.                 )
    
22.         ) >"单词统计.txt"
    

复制代码

Batcher

1. gawk "{for(i=1;i<=NF;i++)a[$i]++}END{for(i in a)print i,a[i]}" a.txt

复制代码

Lumiere

回复 3# Batcher


    请教一下gawk是什么命令呢，好简单啊，看运算符像是VB或者C++一类的命令格式了。

Lumiere

回复 2# tmplinshi


    不过你的代码好像有问题，运行提示找不到运算符和操作数。

Lumiere

回复 1# bfd2138


    以下代码在二楼仁兄代码的基础上修改，他的代码经测试有点小毛病，应该是疏忽了，不过思路很有亮点。假设你的文件名为english text.txt，你自己将代码那部分改成自己的文件名就行。我就晕了，用代码贴出来总是自动删掉一些东西。论坛要注意了，复制代码到代码框里会出毛病。现在直接给出文本代码，自己复制到bat文件里吧。
@echo off
setlocal enabledelayedexpansion
:: ================ 清空以 $ 开头的变量      
for /f "delims==" %%a in ('set $ 2^>nul') do (
set %%a=
)
:: ================ 统计每个单词出现次数
(for /f "usebackq tokens=*" %%a in ("english text.txt") do (
    for %%i in (%%a) do (
::================ 将每个单词代表的变量默认赋为空值
        set /a $%%i+=1!$%%i!
    )      
)) 2>nul
:: ================ 输出结果      
(for /f "tokens=1,2 delims=$=" %%a in ('set $') do (
     echo %%a %%b
)) >"单词统计.txt"
endlocal

1. @echo off
   
2. setlocal enabledelayedexpansion
   
3. :: ================ 清空以 $ 开头的变量      
   
4. for /f "delims==" %%a in ('set $ 2^>nul') do (
   
5. set %%a=
   
6. )
   
7. :: ================ 统计每个单词出现次数
   
8. (for /f "usebackq tokens=*" %%a in ("english text.txt") do (
   
9.     for %%i in (%%a) do (
   
10. ::================ 将每个单词代表的变量默认赋为空值
    
11.         set /a $%%i+=1!$%%i!
    
12.     )      
    
13. )
    
14. ) 2>nul
    
15. :: ================ 输出结果      
    
16. (for /f "tokens=1,2 delims=$=" %%a in ('set $') do (
    
17.      echo %%a %%b
    
18. )
    
19. ) >"单词统计.txt"
    
20. endlocal

复制代码

Batcher

回复 4# Lumiere


C语言编写的一个命令行工具
http://www.bathome.net/thread-21366-1-1.html

terse

忽略大小写的

1. @gawk "{;for(i=1;i<=NF;i++)a[toupper($i)]++}END{for(x in a) print x,a[x]}" <a.txt>单词统计.txt

复制代码

Lumiere

回复 7# Batcher

高级语言就是强大，批处理那么复杂的代码一句就搞定了。