tests/001/query-3.txr


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21

@#
@# This file is in the public domain.
@# It was authored by Kaz Kylheku <kkylheku@gmail.com> in 2009
@#
@/.*/@# skip header
@(collect)
@  (coll)@{TOKEN /[^ ]+/}@(end)
@  (bind (UID PID PPID C STIME TTY TIME . CMD) TOKEN)
@  (cat CMD)
@  (forget TOKEN)
@(end)
@(output)
@(repeat)
@{UID 8} @{PID -5}
@(first)
UID        PID
@{UID 8} @{PID -5}
@(empty)
No processes!
@(end)
@(end)