批处理脚本以分割文件名并生成csv

Question

我在文件夹中有一些pdf文件，需要拆分文件名以创建csv格式的清单。我试图用Windows批处理脚本实现这一点。文件是这样的     d：\ PDF \
    100_200_test_1st.pdf
    100_300_test_2nd.pdf
    100_400_test_3rd.pdf

csv文件应采用此格式

FILE_NAME                    FILE_NAME_WO_EXT   COL1    COL2  COL3  COL4    

100_200_test_1st.pdf        100_200_test_1st     100    200   test  1st  
100_300_test_2nd.pdf        100_300_test_2nd     100    300   test  2nd  
100_400_test_3rd.pdf        100_400_test_3rd     100    400   test  3rd

ANSWER

for entry in `ls $1`
do

echo $entry
col1=`echo $entry |cut -d'_' -f1`
col2=`echo $entry |cut -d'_' -f2`
col3=`echo $entry |cut -d'_' -f3`
col4=`echo $entry |cut -d'_' -f4`
echo $col1
echo $col2
echo $col3
echo $col4
touch col.csv

echo $col1 $col2 $col3 $col4 >> col.csv
done