如何使用Windows批處理文件從文本文件中提取數字？

Question

我需要使用cmd（Windows命令行）執行以下操作。

我有一個名爲DDD.CLI026.WK0933.DDDMR45.001.head的文件。

在文件中的數據是作爲follwing（在一個長行）

HEAD HEALTHDMD Weekly DDD.CLI026 Centocor W200908021012 
TRAIL0101 000000000581 00000CKSUM00000223680 

我需要從000000000581 提取581和它在另一個文件複製，IMS_FILE_to_LND.par， 使用Windows命令行或DOS。

我該怎麼辦？

Answer 1

Irveen，輸入文件（一行），你可以有以下文件：

infile.txt (the inputfile on one line): 
    HEAD HEALTHDMD Weekly DDD.CLI026 Centocor W200908021012 
    TRAIL0101 000000000581 00000CKSUM00000223680 

 

pre.txt (the first half of your desired file): 
    [WCPIT_BIO_EDW.WF:w_DDDMD_LNDG_IMS_NONRET_SALES] 
    $$Cust_RowCount=72648 
    $$Sales_RowCount=5235998 
    $$OuletChangeLog_RowCount=931 

 

post.txt (the second half of your desired file): 
    $$Control_RowCount=4495 
    $$Outl_Subcat_RowCount=105 
    $$Fac_Subcat_RowCount=149 

 

go.cmd (the command file to create your desired file): 
    @echo off 
    setlocal enableextensions enabledelayedexpansion 
    for /f "tokens=8" %%i in (infile.txt) do (
     set num=%%i 
    :loop1 
     if "!num!"=="0" goto :skip1 
     if not "!num:~0,1!"=="0" goto :skip1 
     set num=!num:~1! 
     goto :loop1 
    :skip1 
     type pre.txt >outfile.txt 
     echo $$DRM45_RowCount=!num!>>outfile.txt 
     type post.txt >>outfile.txt 
    ) 
    endlocal 

這將產生文件：

outfile.txt: 
    [WCPIT_BIO_EDW.WF:w_DDDMD_LNDG_IMS_NONRET_SALES] 
    $$Cust_RowCount=72648 
    $$Sales_RowCount=5235998 
    $$OuletChangeLog_RowCount=931 
    $$DRM45_RowCount=581 
    $$Control_RowCount=4495 
    $$Outl_Subcat_RowCount=105 
    $$Fac_Subcat_RowCount=149 

這是什麼，我相信，你這一連串的問題通緝。作爲解釋，for循環處理你的一行，提取字段（000 ... 00581）。循環跳過部分簡單地刪除前導零，直到您自己有一個0或一個實數（Windows將前導零的數字視爲八進制數，這對我們來說不是好事）。

一旦數字被提取出來，您只需從位置前和位置以及要修改的行構建文件。

我知道，它比我之前給出的awk解決方案多一點點，但它可以在Windows中做到這一點，而不必添加第三方軟件（您指出這不是您的其中一個選項問題）。

更新1：以下是根據要求使用單個模板文件創建輸出文件的版本。模板文件必須具有以"pre:"或"post:"開頭的行來指示它們是在來自要插入的行之前還是之後。沒有標記的線條根本不使用，因此您可以將空行或註釋插入到心臟的內容中。所以你的文件將是：

pre:[WCPIT_BIO_EDW.WF:w_DDDMD_LNDG_IMS_NONRET_SALES] 
pre:$$Cust_RowCount=72648 
pre:$$Sales_RowCount=5235998 
pre:$$OuletChangeLog_RowCount=931 

post:$$Control_RowCount=4495 
post:$$Outl_Subcat_RowCount=105 
post:$$Fac_Subcat_RowCount=149 

這是命令腳本，它會給你你需要的。我只是使用一種技巧臨時創建前後文件，以最大限度地減少所需的更改。

@echo off 
setlocal enableextensions enabledelayedexpansion 
del /q /q pre.txt post.txt >nul: 2>nul: 
for /f "delims=" %%j in (template.txt) do (
    set ln=%%j 
    if "!ln:~0,4!"=="pre:" echo !ln:~4!>>pre.txt 
    if "!ln:~0,5!"=="post:" echo !ln:~5!>>post.txt 
) 
for /f "tokens=8" %%i in (infile.txt) do (
    set num=%%i 
:loop1 
    if not "!num!"=="0" (
     if "!num:~0,1!"=="0" (
      set num=!num:~1! 
      goto :loop1 
     ) 
    ) 
) 
type pre.txt >outfile.txt 
echo $$DRM45_RowCount=!num!>>outfile.txt 
type post.txt >>outfile.txt 
del /q /q pre.txt post.txt >nul: 2>nul: 
endlocal 

它輸出：

[WCPIT_BIO_EDW.WF:w_DDDMD_LNDG_IMS_NONRET_SALES] 
$$Cust_RowCount=72648 
$$Sales_RowCount=5235998 
$$OuletChangeLog_RowCount=931 
$$DRM45_RowCount=581 
$$Control_RowCount=4495 
$$Outl_Subcat_RowCount=105 
$$Fac_Subcat_RowCount=149 

就像上面的前/後的解決方案，但隨着新的要求得到滿足。

更新2：如果你能說服他們去Cygwin的解決方案，這是所有你需要：

x=$(expr 0 + $(awk '{print $8}' infile)) 
sed "s/^\$\$DRM45_RowCount=.*$/\$\$DRM45_RowCount=$x/" cfgfile >cfgfile_new 

隨着cfgfile包含：

[WCPIT_BIO_EDW.WF:w_DDDMD_LNDG_IMS_NONRET_SALES] 
$$Cust_RowCount=72648 
$$Sales_RowCount=5235998 
$$OuletChangeLog_RowCount=931 
$$DRM45_RowCount=whatever 
$$Control_RowCount=4495 
$$Outl_Subcat_RowCount=105 
$$Fac_Subcat_RowCount=149 

和infile含（短但相同數量的字段）：

HD HLTHDMD Wkly DDD.CLI Cntcr W200908021012 TRAIL0101 00581 00000CKSUM680 

您會收到以下cfgfile_new：

[WCPIT_BIO_EDW.WF:w_DDDMD_LNDG_IMS_NONRET_SALES] 
$$Cust_RowCount=72648 
$$Sales_RowCount=5235998 
$$OuletChangeLog_RowCount=931 
$$DRM45_RowCount=581 
$$Control_RowCount=4495 
$$Outl_Subcat_RowCount=105 
$$Fac_Subcat_RowCount=149 

瞧！非常簡單。隨意使用CMD腳本和Cygwin腳本來說服他們應該使用更好的工具，你的管理:-)

Answer 2

你能安裝Cygwin嗎？或者使用微軟PowerShell？ 如果是，那麼您將擁有更強大的工具（例如正則表達式）。