# wc2.awk { i++ # i が行数を示す。 m=split($0, w ," ") # 1行($0)から単語を取り出す。単語はスペースで # 区切られている。 w[1],w[2],・・・,w[m] が単語 wc += m # m を加えていく。 wc が単語数 a += length($0) # a : 空白を含む文字数 for(j=1;j<=m;j++) b += length(w[j]) # b : 空白を除く文字数 } END{ printf("%10s%10s%10s%10s\n","行数","単語数","文字数1","文字数2") printf("%10d%10d%10d%10d\n", i, wc, a, b) }