ProfitPress Mega CDROM2 …eeware (MSDOS)(1992)(Eng)/ProfitPress-MegaCDROM2.B6I/TEXT/UTILITY/AWK320.ZIP/ARRAY.AWK

Text File | 1990-02-08 | 248 b | 8 lines

# demonstrate set operations on an array

$1 == "IN" { if ($2 in a) print $2, a[$2]; else print $2, "is not in a"; next}
$1 == "DEL" { delete a[$2]; next }
$0 == "ALL" { for (i in a) printf("a[%s] = %s\n", i, a[i]) }
NF == 2 { a[$1] = $2 }