关于awk函数的问题

zhaobin81

file:

20090202:Susan Dalsass206) 548-1348:250:60:50
20090202:Archie McNichol206) 654-6279:250:100:175

#!/bin/awk -f
function avg_mon (mon)
{
        while(getline)
        if (substr($1,1,6)==mon)
        {
                c++
                s+=$NF
        }
        print mon":"s/c
}

BEGIN{
        FS=":"
        system("printf \"please input month: \";read mon;export mon;"
        avg_mon(ENVIRON["mon"])
}


[root@oracle ~]# ./test file
please input month: 200902
awk: ./test:10: (FILENAME=file FNR=2) fatal: division by zero attempted



这是以前的贴子看了一下
自己改了改
可是报错
可自己感觉没啥问题啊
高手帮忙看盾

ywlscpl

system("printf \"please input month: \";read mon;export mon;")
        avg_mon(ENVIRON["mon"])
----->

        printf "please input month: "
        getline input <"-"
        avg_mon(input)

zhaobin81

为什么我那么写不行啊

ruifox

原帖由 zhaobin81 于 2009-10-11 19:03 发表
为什么我那么写不行啊

可能和shell版本有关系，我这里也不行！试试这个：

1. getline input<"'`tty`'"

复制代码

blackold

ENVIRON["mon"]为空。

ywlscpl

getline input <"-"不行的话，试试
getline input <"/dev/tty"