xref
: /
freebsd
/
contrib
/
one-true-awk
/
testdir
/
p.48b
(revision 1b10e191f341111fad7be32ead11484dfd09b800)
Home
History
Annotate
Line#
Scopes#
Navigate#
Raw
Download
current directory
1
BEGIN { k = 3; n = 10 }
2
{ if (n <= 0) exit
3
if (rand() <= k/n) { print; k-- }
4
n--
5
}
6