【求教】AIX下怎么用DATE取上月的月份？

lan97

本菜鸟想在AIX系统下取上月的月份，如果用DATE函数怎么实现啊？

ivhb

date '%m'

[ 本帖最后由 ivhb 于 2007-9-25 10:20 编辑 ]

lan97

原帖由 ivhb 于 2007-9-25 10:19 发表
date '%m'

老大，我请教的是上月的月份，而且能在12月时 计算出上月是 01月的。

ivhb

呵呵，这个.....

joan8363

原帖由 lan97 于 2007-9-25 10:27 发表

老大，我请教的是上月的月份，而且能在12月时 计算出上月是 01月的。

12月上个月没记错的话，应该是11月吧
非1时，减1即为上月月份
1时，就print 12

lan97

原帖由 joan8363 于 2007-9-25 10:38 发表

12月上个月没记错的话，应该是11月吧
非1时，减1即为上月月份
1时，就print 12

哦哦，是我糊涂了 1月的上月是12月
我乱写了个sh，语法估计都错了 ，请各位改下。

month=`date "+%m"`
permonth=`expr $month - 1`
month_len=`expr length $permonth`

if [$month_len=1]; then
v_month=0$permonth
elif [$month_len=2]; then
v_month=$permonth
elif [$permonth=0]; then
v_month=`12`
fi

waker

date +%m |sed 's/$/b12a01a02a03a04a05a06a07a08a09a10a11a12/;
s/^\(..\)b.*\(..\)a\1.*/\2/'

lan97

原帖由 waker 于 2007-9-25 11:03 发表
date +%m |sed 's/$/b12a01a02a03a04a05a06a07a08a09a10a11a12/;
s/^\(..\)b.*\(..\)a\1.*/\2/'

哇，大师果然强悍。 菜鸟我还是想请教下，怎么修改下面的脚本才是对的

month=`date "+%m"`
permonth=`expr $month - 1`
month_len=`expr length $permonth`

if ["$month_len"="1"]; then
v_month=0$permonth
elif ["$month_len"="2"]; then
v_month=$permonth
elif ["$permonth"="0"]; then
v_month=12
fi

用SH运行时 报错
test.sh[5]: [1=1]:  not found.
test.sh[7]: [1=2]:  not found.
test.sh[9]: [8=0]:  not found.

joan8363

month=$(date "+%m"|sed '/^0/ s/0//')
permonth=`expr $month - 1`
month_len=`expr length $permonth`
if [ $month_len=1 ]; then
v_month=0$permonth
elif [ $month_len=2 ]; then
v_month=$permonth
elif [ $permonth=0 ]; then
v_month=`12`
fi
echo ${v_month}


这是你的思路

mxbao

[ "$month_len" = "1" ]; 即可