1*23f24377SWarner Losh{ print } 2*23f24377SWarner Losh{ print NR, NF, $0 } 3*23f24377SWarner Losh{ $2 = length($2); print } 4*23f24377SWarner Losh{ s += length($2) } 5*23f24377SWarner LoshEND { print s } 6*23f24377SWarner Losh{ s += $3 } 7*23f24377SWarner LoshEND { print s } 8*23f24377SWarner Losh{ for (i = NF; i > 0; i--) 9*23f24377SWarner Losh printf "%s ", $i 10*23f24377SWarner Losh printf("\n") 11*23f24377SWarner Losh} 12*23f24377SWarner Losh $1 == $1 && $2 == $2 # test some string compares 13*23f24377SWarner Losh $1 != $2 14*23f24377SWarner Losh{ 15*23f24377SWarner Losh sss = "" 16*23f24377SWarner Losh for (i = NF; i > 0; i--) 17*23f24377SWarner Losh sss = sss " " $i 18*23f24377SWarner Losh print sss 19*23f24377SWarner Losh} 20*23f24377SWarner Losh{ 21*23f24377SWarner Losh xx[$1] += length 22*23f24377SWarner Losh} 23*23f24377SWarner LoshEND { 24*23f24377SWarner Losh for (i in xx) 25*23f24377SWarner Losh print i, xx[i] | "sort" 26*23f24377SWarner Losh} 27*23f24377SWarner LoshNF % 2 == 0 28*23f24377SWarner Loshlength % 2 == 0 29*23f24377SWarner Losh! /^./ 30*23f24377SWarner Losh/.$/ 31*23f24377SWarner LoshBEGIN { xxx = ".$" } 32*23f24377SWarner Losh$0 ~ xxx 33*23f24377SWarner Losh{ print substr($0, 10,10) } 34*23f24377SWarner Losh{ $3 = "xxx" $3 "xxx"; $4--; print } 35*23f24377SWarner Losh{ for (i = 1; i <= NF; i++) 36*23f24377SWarner Losh x[i] = $i 37*23f24377SWarner Losh for (i = 1; i <= NF; i++) 38*23f24377SWarner Losh print x[i] 39*23f24377SWarner Losh} 40*23f24377SWarner Losh{ for (i = 1; i <= NF; i++) 41*23f24377SWarner Losh y[i] = $i 42*23f24377SWarner Losh for (i = 1; i <= NF; i++) 43*23f24377SWarner Losh printf "%d %s\n", i, y[i] 44*23f24377SWarner Losh} 45*23f24377SWarner Loshfunction abs(x) { return (x < 0) ? -x : x } 46*23f24377SWarner LoshBEGIN { n = 1000 47*23f24377SWarner Losh for (i = 1; i < n; i++) x[i] = rand() 48*23f24377SWarner Losh for (i in x) 49*23f24377SWarner Losh for (j in x) 50*23f24377SWarner Losh if (abs(x[i]-x[j]) < .01) break 51*23f24377SWarner Losh } 52