help! please simplify this shell program!

夜未眠

你是手工输入的代码还是复制过去的，如果是手工输入的要确信没有输错。

你哪儿人啊，我看吃得到不

Pacific Yan

I am in USA, but most likely I will visit China sometime this year.  Where are you?

Trust me I will invite you for sure!

I will take a look the code since I copy it to my UNIX machine.

夜未眠

USA?????晕掉. 没戏了，除非你是来下面这两个地方之一
ChongQing ,HangZhou

你在unix下直接下载这个文件试试，我这儿执行没问题，不过我的系统是FreeBSD,不知道你的是什么.

ftp://bu.dns0755.net/test.sh

Pacific Yan

I am in IBM Unix machine and use the korn shell which is required by this test.


ChongQing and HangZhou are beautiful city which I have never been there before.  Wuhan and Beijing are the only city I had lived ...


After meeting I will try again and see what happens.  Maybe it is a minor probelm.

夜未眠

korn shell没用过.       
没有sh吗？

$ ls /bin/sh

Pacific Yan

Now it works for me, but the output isn't in one line.  

It should be like this:  $ Sunday Thursday Friday

By the way, thank you a lot and keep in touch!


$ cat >test.sh
#!/usr/bin/ksh
if [ $# -ne 1 ];then exit 1;fi
if [ $1 -ge 1 ] && [ $1 -le 9999 ];then

da=0
for st in Sunday Monday Tuesday Wednesday Thursday Friday Saturday;do
        eval str_$da=$st
        da=$(($da + 1))
done

mon=1
while [ $mon -le 12 ];do
        da=`cal $mon $1 |awk 'NR==3{loc=index($0,"1";print (loc-2)/3;exit}'`
        eval "count_$da=\$((\$count_$da+1))"
        mon=$(($mon + 1 ))
done

da=0
while [ $da -le 6 ];do
        eval dcn=\$count_$da
        if [ $dcn -eq 1 ];then
                eval "echo \"\$str_$da \""|awk 'BEGIN {OFS=" "; ORS=" "} {print $1} END {print "\n"}'
fi
        da=$(($da + 1))
done
echo
fi

$ test.sh 2003
Sunday
Thursday
Friday

夜未眠

eval "echo \"\$str_$da \""|awk 'BEGIN {OFS=" "; ORS=" "} {print $1} END {print "\n"}'
this line failed. check it yourself.

Pacific Yan

You are right, this line failed, but it works in Compaq Tru64 and also IBM, but doesn't work in SunOS 5.8, why?

see the following example in Tru64 korn shell:

$ cat sorttest
Friday 1
Sunday 1
Thursday 1
Monday 2
Tuesday 2
Wednesday 2
Saturday 3

$ cat sorttest |awk 'BEGIN {OFS=" "; ORS=" "} {print $1} END {print "\n"}'
Friday Sunday Thursday Monday Tuesday Wednesday Saturday

夜未眠

是不是你的echo没有-n参数?你想用awk代替?

夜未眠

END {print "\n"}
删掉这段应该可以了