AWK 内置函数

$ awk 'BEGIN {
  PI = 3.14159265
  x = -10
  y = 10
  result = atan2 (y,x) * 180 / PI;

  printf "The arc tangent for (x=%f, y=%f) is %f degrees\n", x, y, result
}'

The arc tangent for (x=-10.000000, y=10.000000) is 135.000000 degrees

$ awk 'BEGIN {
  PI = 3.14159265
  param = 60
  result = cos(param * PI / 180.0);

  printf "The cosine of %f degrees is %f.\n", param, result
}'

The cosine of 60.000000 degrees is 0.500000.

$ awk 'BEGIN {
  PI = 3.14159265
  param = 30.0
  result = sin(param * PI /180)

  printf "The sine of %f degrees is %f.\n", param, result
}'

The sine of 30.000000 degrees is 0.500000.

$ awk 'BEGIN {
  param = 5
  result = exp(param);

  printf "The exponential value of %f is %f.\n", param, result
}'

The exponential value of 5.000000 is 148.413159.

$ awk 'BEGIN {
  param = 5.5
  result = log (param)

  printf "log(%f) = %f\n", param, result
}'

log(5.500000) = 1.704748

$ awk 'BEGIN {
  param = 1024.0
  result = sqrt(param)

  printf "sqrt(%f) = %f\n", param, result
}'

sqrt(1024.000000) = 32.000000

$ awk 'BEGIN {
  param = 5.12345
  result = int(param)

  print "Truncated value =", result
}'

Truncated value = 5

$ awk 'BEGIN {
  print "Random num1 =" , rand()
  print "Random num2 =" , rand()
  print "Random num3 =" , rand()
}'

Random num1 = 0.237788
Random num2 = 0.291066
Random num3 = 0.845814

$ awk 'BEGIN {
  param = 10

  printf "srand() = %d\n", srand()
  printf "srand(%d) = %d\n", param, srand(param)
}'

srand() = 1
srand(10) = 1417959587

$ awk 'BEGIN {
    str = "Hello, World"

    print "String before replacement = " str

    gsub("World", "Jerry", str)

    print "String after replacement = " str
}'

String before replacement = Hello, World
String after replacement = Hello, Jerry

$ awk 'BEGIN {
    str = "Hello, World"

    print "String before replacement = " str

    sub("World", "Jerry", str)

    print "String after replacement = " str
}'

String before replacement = Hello, World
String after replacement = Hello, Jerry

$ awk 'BEGIN {
    str = "Hello, World !!!"
    subs = substr(str, 1, 5)

    print "Substring = " subs
}'

Substring = Hello

$ awk 'BEGIN {
    str = "One Two Three"
    subs = "Two"

    ret = index(str, subs)

    printf "Substring \"%s\" found at %d location.\n", subs, ret
}'

Substring "Two" found at 5 location.

$ awk 'BEGIN {
    str = "Hello, World !!!"

    print "Length = ", length(str)
}'

Substring "Two" found at 5 location.

$ awk 'BEGIN {
    str = "Hello, World !!!"
    subs = substr(str, 1, 5)

    print "Substring = " subs
}'

Substring = Hello

$ awk 'BEGIN {
    str = "One Two Three"
    subs = "Two"

    ret = match(str, subs)

    printf "Substring \"%s\" found at %d location.\n", subs, ret
}'

Substring "Two" found at 5 location.

$ awk 'BEGIN {
    str = "One,Two,Three,Four"

    split(str, arr, ",")

    print "Array contains following values"

    for (i in arr) {
        print arr[i]
    }
}'

Array contains following values
One
Two
Three
Four

$ awk 'BEGIN {
    str = "HELLO, WORLD !!!"

    print "Lowercase string = " tolower(str)
}'

Lowercase string = hello, world !!!

$ awk 'BEGIN {
    str = "hello, world !!!"

    print "Uppercase string = " toupper(str)
}'

Uppercase string = HELLO, WORLD !!!

$ awk 'BEGIN {
    str = sprintf("%s", "Hello, World !!!")

    print str
}'

Hello, World !!!

$ awk 'BEGIN {
    print "十进制数 = " strtonum("123")
    print "八进制数 = " strtonum("0123")
    print "十六进制数 = " strtonum("0x123")
}'

十进制数 = 123
八进制数 = 83
十六进制数 = 291

$ awk 'BEGIN {
    print "Number of seconds since the Epoch = " mktime("2014 12 14 30 20 10")
}'

Number of seconds since the Epoch = 1418604610

$ awk 'BEGIN {
    print strftime("Time = %m/%d/%Y %H:%M:%S", systime())
}'

Time = 12/14/2014 22:08:42

awk 'BEGIN{now=systime();print now}'

1343210982

$ awk 'BEGIN {
    num1 = 10
    num2 = 6

    printf "(%d AND %d) = %d\n", num1, num2, and(num1, num2)
}'

(10 AND 6) = 2

$ awk 'BEGIN {
    num1 = 10

    printf "compl(%d) = %d\n", num1, compl(num1)
}'

compl(10) = 9007199254740981

$ awk 'BEGIN {
    num1 = 10

    printf "lshift(%d) by 1 = %d\n", num1, lshift(num1, 1)
}'

lshift(10) by 1 = 20

$ awk 'BEGIN {
    num1 = 10

    printf "rshift(%d) by 1 = %d\n", num1, rshift(num1, 1)
}'

rshift(10) by 1 = 5

$ awk 'BEGIN {
    num1 = 10
    num2 = 6

    printf "(%d OR %d) = %d\n", num1, num2, or(num1, num2)
}'

(10 OR 6) = 14

$ awk 'BEGIN {
    num1 = 10
    num2 = 6

    printf "(%d XOR %d) = %d\n", num1, num2, xor(num1, num2)
}'

(10 bitwise xor 6) = 12

$ awk 'BEGIN {
    cmd = "tr [a-z] [A-Z]"
    print "hello, world !!!" |& cmd
    close(cmd, "to")
    cmd |& getline out
    print out;
    close(cmd);
}'

HELLO, WORLD !!!

• 第一条语句 cmd = "tr [a-z] [A-Z]" 在　AWK 中建立了一个双向的通信通道。
• 第二条语句 print 为 tr 命令提供输入。&| 表示双向通信。
• 第三条语句 close(cmd, "to") 完成执行后关闭 to 进程。
• 第四条语句 cmd |& getline out 使用 getline 函数将输出存储到 out 变量中。
• 接下来的输出语句打印输出的内容，最后 close 函数关闭 cmd。

$ awk 'BEGIN {
    arr[0] = "One"
    arr[1] = "Two"
    arr[2] = "Three"
    arr[3] = "Four"

    print "Array elements before delete operation:"
    for (i in arr) {
        print arr[i]
    }

    delete arr[0]
    delete arr[1]

    print "Array elements after delete operation:"
    for (i in arr) {
        print arr[i]
    }
}'

Array elements before delete operation:
One
Two
Three
Four

Array elements after delete operation:
Three
Four

$ awk 'BEGIN {
    print "Hello, World !!!"

    exit 10

    print "AWK never executes this statement."
}'

Hello, World !!!

$ awk '{getline; print $0}' marks.txt 

$ awk '{if ($0 ~/Shyam/) next; print $0}' marks.txt

file1:str1
file1:str2
file1:str3
file1:str4

file2:str1
file2:str2
file2:str3
file2:str4

$ awk '{ if ($0 ~ /file1:str2/) nextfile; print $0 }' file1.txt file2.txt

file1:str1
file2:str1
file2:str2
file2:str3
file2:str4

function addition(num1, num2)
{
    result = num1 + num2

    return result
}

BEGIN {
    res = addition(10, 20)
    print "10 + 20 = " res
}

$ awk -f functions.awk 
10 + 20 = 30

$ awk 'BEGIN { ret = system("date"); print "Return value = " ret }'

Sun Dec 21 23:16:07 IST 2014
Return value = 0