欢迎大侠来一显身手。

cfzxwxb

cal 2013 命令会产生一个文本文件，类似这样：
                              2013                              

        一月                   二月                   三月        
日 一 二 三 四 五 六   日 一 二 三 四 五 六   日 一 二 三 四 五 六
       1  2  3  4  5                   1  2                   1  2
6  7  8  9 10 11 12    3  4  5  6  7  8  9    3  4  5  6  7  8  9
13 14 15 16 17 18 19   10 11 12 13 14 15 16   10 11 12 13 14 15 16
20 21 22 23 24 25 26   17 18 19 20 21 22 23   17 18 19 20 21 22 23
27 28 29 30 31         24 25 26 27 28         24 25 26 27 28 29 30
                                              31
        四月                   五月                   六月        
日 一 二 三 四 五 六   日 一 二 三 四 五 六   日 一 二 三 四 五 六
    1  2  3  4  5  6             1  2  3  4                      1
7  8  9 10 11 12 13    5  6  7  8  9 10 11    2  3  4  5  6  7  8
14 15 16 17 18 19 20   12 13 14 15 16 17 18    9 10 11 12 13 14 15
21 22 23 24 25 26 27   19 20 21 22 23 24 25   16 17 18 19 20 21 22
28 29 30               26 27 28 29 30 31      23 24 25 26 27 28 29
                                              30
        七月                   八月                   九月        
日 一 二 三 四 五 六   日 一 二 三 四 五 六   日 一 二 三 四 五 六
    1  2  3  4  5  6                1  2  3    1  2  3  4  5  6  7
7  8  9 10 11 12 13    4  5  6  7  8  9 10    8  9 10 11 12 13 14
14 15 16 17 18 19 20   11 12 13 14 15 16 17   15 16 17 18 19 20 21
21 22 23 24 25 26 27   18 19 20 21 22 23 24   22 23 24 25 26 27 28
28 29 30 31            25 26 27 28 29 30 31   29 30

        十月                  十一月                 十二月      
--More--(80%)
怎样生成一个如下的文本文件：？
20130101二
20130102三
20130103四
20130104五
20130105六
20130106日
20130107一
......
一直生成到
20131231二

bikkuri

1. year=2013;for month in $(seq 12);do cal $month $year|awk -vy=$year -vm=$month 'NR==2{for(w=0;w<NF;w++)week[w]=$(w+1)}NR>2{for(d=NF;d>0;d--)day[10000*y+100*m+$d]=($d>7)?week[d-1]:week[6-NF+d]}END{for(d in day){print d"["day[d]"]"}}';done|sort

复制代码

1. year=2013;for month in $(seq 12);do cal $month $year|sed '1,2d;s/ /\n/g'|xargs -Iday date -d $year-$month-day +%Y%m%d[%a];done

复制代码

回复 1# cfzxwxb


   

聆雨淋夜

1. for i in `seq 12`
   
2. > do
   
3. > cal $i 2015|xargs|awk -vv=$i '{for(i=10;i<=NF;i++){"date -d 2015-"v"-"$i" +%Y%m%d%w" |getline var;print var >>"file"}}'
   
4. > done

复制代码

bikkuri

你直接用：

1. for i in `seq 12`
   
2. do
   
3. cal $i 2015|xargs|awk -vv=$i '{for(i=10;i<=NF;i++){"date -d 2015-"v"-"$i" +%Y%m%d[%w]" |getline var;print var >>"file"}}'
   
4. done

复制代码

不是可以省掉后面的那条sub处理？


回复 3# 聆雨淋夜


   

聆雨淋夜

将上面得到的file最后一个数字改为汉字

1. awk -F '' -vOFS='' 'BEGIN{s="日 一 二 三 四 五 六";split(s,a," ")}{$NF=a[$NF+1]}1' file

复制代码

聆雨淋夜

回复 4# bikkuri
好主意，我对date命令不熟，哈哈

   

ly5066113

回复 1# cfzxwxb


try:

1. seq 365 | sed 's/.*/date -d "20121231 +& day" +%Y%m%d%a/e'

复制代码

bamqjurgg

附上小弟的代码 只是换了个思路 请勿参考，效率很低。
附带请教大家一个问题

1. #!/bin/sh
   
2. read -p "Please input the year:" year
   
3. days=`date -d $year-12-31 "+%j"`
   
4. now=`date +%j`
   
5. seq 1 `expr "${days#0}" - "${now#0}"`          #此行可正常运行出序列
   
6. for i in `seq 1 "${now#0}"`
   
7. do
   
8. echo `date -d -$i+day "+%F-%w"`
   
9. done
   
10. for k in `seq 1 `expr "${days#0}" - "${now#0}"``    #为何放入for循环中就报错。
    
11. do
    
12. echo $k
    
13. #echo `date -d $k+day "+%F-%w"`
    
14. done
    
15. ~
    

复制代码

最后排序。

bamqjurgg

回复 7# ly5066113

这个可以改为个通用型么 遇到366天也正常的。

blackold

try:

1. echo 2013-{01..12}-{01..31}|tr \  '\n'|date -f - +%Y%m%d%a 2>/dev/null

复制代码