[原创计算昨天.明天日期的脚本

styr

unix难道比linux更高级?
俺想玩linux还没地方玩呢
想下什么东西?
sco unix还是ksh还是bash?
linux默认的就是bash,比ksh更好用
sco在置顶的ftp里有下

styr

精简了一下代码,改while为case,感觉清淅了一些

1. #!/bin/ksh
   
2. #计算昨天.明天日期的脚本 V051129
   
3. #四川省乐山市沙湾区邮政局 宋涛
   
4. 
   
5. dd=$(date +%d)
   
6. mm=$(date +%m)
   
7. yy=$(date +%Y)
   
8. case $dd in
   
9. 01) [ $mm = "01" ] && { yesterday=$((yy-1))1231 ; tomorrow=${yy}0102 ; } || \
   
10. { yesterday=${yy}$((mm-1))$(cal $((mm-1)) $yy |xargs|awk '{print $NF}') ;  tomorrow=${yy}${mm}02 ; } ;;
    
11. $(cal $mm $yy |xargs|awk '{print $NF}') )
    
12. [ $mm = "12" ] && { yesterday=${yy}1230 ; tomorrow=$((yy+1))0101 ; } || \
    
13. { yesterday=${yy}${mm}$((dd-1)) ; tomorrow=${yy}$((mm+1))01 ; } ;;
    
14. *) yesterday=${yy}${mm}$(printf "%02d" $((dd-1)))  ; tomorrow=${yy}${mm}$(printf "%02d" $((dd+1))) ;;
    
15. esac
    
16. echo " yesterday = $yesterday\n tomorrow  = $tomorrow"

复制代码

flw

为什么不用 date 命令？
想不通～

waker

原帖由 flw 于 2005-11-29 18:59 发表
为什么不用 date 命令？
想不通～

因为很多人用不着强劲的GNU date

flw

原帖由 waker 于 2005-11-29 19:02 发表

因为很多人用不着强劲的GNU date

是不是有的系统上没有？

dbcat

Future 10 days.

date function is not portable in sco...........

1. #!/usr/bin/ksh
   
2. Days=10
   
3. PS3='Choose a date (or q to quit) ? : '
   
4. select Date in $(perl -e '
   
5.   $d = time();
   
6.   for ($i = 0; $i < $ARGV[0]; $i++) {
   
7.     @f = localtime($d);
   
8.     printf "%04d%02d%02d\n", $f[5]+1900, $f[4]+1, $f[3];
   
9.     $d-=86400;
   
10.   }' $Days)
    
11. do
    
12.   break
    
13. done
    
14. echo Date is ${Date?Aborted}

复制代码

styr

偶的是sco unix505,没有GNU date,也没perl........
只有ksh.......只能用土办法了

flw

原帖由 styr 于 2005-11-29 19:08 发表
偶的是sco unix505,没有GNU date,也没perl........
只有ksh.......只能用土办法了

装个 perl 呀！
还有啊，就算是没有，用 C 写一个也很容易嘛！

寂寞烈火

原帖由 waker 于 2005-11-29 19:02 发表

因为很多人用不着强劲的GNU date

因为他们没吃透三个代表的精神  他们不知道什么是与时俱进嘛

styr

唉,俺是邮政系统的,我们这个市的前置机都是Scounix,就算偶装个bash或perl.但也不能保证别的市县也有,为了通用性,只好这样手工制作了.......而且上级有规定,不能私自在服务器上安装任何软件.......

至于C,多年没碰过了,...当初也没学好过....