github.com/benhoyt/goawk@v1.8.1/testdata/tt.big (about)

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