blob: b31409f23008e1609a10d9b52ae53c4d332839ae (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
# ../gawk -lsparr -f testsparr.awk
BEGIN {
print SYS["time"]
SYS["readline"] = "sparr.c";
printf("File %s has %d lines\n", SYS["readline"], length(READLINE))
SYS["readline"] = "testsparr.awk";
printf("File %s has %d lines\n", SYS["readline"], length(READLINE))
for (i = 1; i in READLINE; i++)
print READLINE[i]
system("sleep 1")
# PROCINFO["/dev/stdin", "READ_TIMEOUT"] = 1000
# getline < "/dev/stdin"
print SYS["time"]
}
|