diff options
Diffstat (limited to 'contrib/awk/awklib/eg/misc')
-rw-r--r-- | contrib/awk/awklib/eg/misc/arraymax.awk | 10 | ||||
-rw-r--r-- | contrib/awk/awklib/eg/misc/arraymax.data | 5 | ||||
-rw-r--r-- | contrib/awk/awklib/eg/misc/findpat.awk | 10 | ||||
-rw-r--r-- | contrib/awk/awklib/eg/misc/findpat.data | 7 | ||||
-rw-r--r-- | contrib/awk/awklib/eg/misc/findpat.sh | 10 |
5 files changed, 0 insertions, 42 deletions
diff --git a/contrib/awk/awklib/eg/misc/arraymax.awk b/contrib/awk/awklib/eg/misc/arraymax.awk deleted file mode 100644 index 20dd176..0000000 --- a/contrib/awk/awklib/eg/misc/arraymax.awk +++ /dev/null @@ -1,10 +0,0 @@ -{ - if ($1 > max) - max = $1 - arr[$1] = $0 -} - -END { - for (x = 1; x <= max; x++) - print arr[x] -} diff --git a/contrib/awk/awklib/eg/misc/arraymax.data b/contrib/awk/awklib/eg/misc/arraymax.data deleted file mode 100644 index dbee328..0000000 --- a/contrib/awk/awklib/eg/misc/arraymax.data +++ /dev/null @@ -1,5 +0,0 @@ -5 I am the Five man -2 Who are you? The new number two! -4 . . . And four on the floor -1 Who is number one? -3 I three you. diff --git a/contrib/awk/awklib/eg/misc/findpat.awk b/contrib/awk/awklib/eg/misc/findpat.awk deleted file mode 100644 index e9bef9e..0000000 --- a/contrib/awk/awklib/eg/misc/findpat.awk +++ /dev/null @@ -1,10 +0,0 @@ -{ - if ($1 == "FIND") - regex = $2 - else { - where = match($0, regex) - if (where != 0) - print "Match of", regex, "found at", - where, "in", $0 - } -} diff --git a/contrib/awk/awklib/eg/misc/findpat.data b/contrib/awk/awklib/eg/misc/findpat.data deleted file mode 100644 index 9f72969..0000000 --- a/contrib/awk/awklib/eg/misc/findpat.data +++ /dev/null @@ -1,7 +0,0 @@ -FIND ru+n -My program runs -but not very quickly -FIND Melvin -JF+KM -This line is property of Reality Engineering Co. -Melvin was here. diff --git a/contrib/awk/awklib/eg/misc/findpat.sh b/contrib/awk/awklib/eg/misc/findpat.sh deleted file mode 100644 index 3971032..0000000 --- a/contrib/awk/awklib/eg/misc/findpat.sh +++ /dev/null @@ -1,10 +0,0 @@ -awk '{ - if ($1 == "FIND") - regex = $2 - else { - where = match($0, regex) - if (where != 0) - print "Match of", regex, "found at", \ - where, "in", $0 - } -}' |