Gecko [ betsfootball.net ]

Name	Size	Permission	Date
alarm.awk	2.31 KB	-rw-r--r--	2022-11-17 16:36
anagram.awk	1.33 KB	-rw-r--r--	2022-11-17 16:36
awksed.awk	515 B	-rw-r--r--	2022-11-17 16:36
cut.awk	3.61 KB	-rw-r--r--	2022-11-17 16:36
dupword.awk	507 B	-rw-r--r--	2022-11-17 16:36
egrep.awk	2.4 KB	-rw-r--r--	2022-11-17 16:36
extract.awk	1.84 KB	-rw-r--r--	2022-11-17 16:36
guide.awk	165 B	-rw-r--r--	2022-11-17 16:36
histsort.awk	283 B	-rw-r--r--	2022-11-17 16:36
id.awk	4.24 KB	-rw-r--r--	2022-11-17 16:36
igawk.sh	3.11 KB	-rw-r--r--	2022-11-17 16:36
indirectcall.awk	1.91 KB	-rw-r--r--	2022-11-17 16:36
labels.awk	1014 B	-rw-r--r--	2022-11-17 16:36
pi.awk	341 B	-rw-r--r--	2022-11-17 16:36
split.awk	3.25 KB	-rw-r--r--	2022-11-17 16:36
tee.awk	770 B	-rw-r--r--	2022-11-17 16:36
testbits.awk	736 B	-rw-r--r--	2022-11-17 16:36
translate.awk	1.15 KB	-rw-r--r--	2022-11-17 16:36
uniq.awk	2.9 KB	-rw-r--r--	2022-11-17 16:36
wc.awk	1.79 KB	-rw-r--r--	2022-11-17 16:36
wordfreq.awk	347 B	-rw-r--r--	2022-11-17 16:36

Rename

# egrep.awk --- simulate egrep in awk
#
# Arnold Robbins, arnold@skeeve.com, Public Domain
# May 1993
# Revised September 2020

# Options:
#    -c    count of lines
#    -e    argument is pattern
#    -i    ignore case
#    -l    print filenames only
#    -n    add line number to output
#    -q    quiet - use exit value
#    -s    silent - don't print errors
#    -v    invert test, success if no match
#    -x    the entire line must match
#
# Requires getopt library function
# Uses IGNORECASE, BEGINFILE and ENDFILE
# Invoke using gawk -f egrep.awk -- options ...

BEGIN {
    while ((c = getopt(ARGC, ARGV, "ce:ilnqsvx")) != -1) {
        if (c == "c")
            count_only++
        else if (c == "e")
            pattern = Optarg
        else if (c == "i")
            IGNORECASE = 1
        else if (c == "l")
            filenames_only++
        else if (c == "n")
            line_numbers++
        else if (c == "q")
            no_print++
        else if (c == "s")
            no_errors++
        else if (c == "v")
            invert++
        else if (c == "x")
            full_line++
        else
            usage()
    }
    if (pattern == "")
        pattern = ARGV[Optind++]

if (pattern == "")
      usage()

for (i = 1; i < Optind; i++)
        ARGV[i] = ""

if (Optind >= ARGC) {
        ARGV[1] = "-"
        ARGC = 2
    } else if (ARGC - Optind > 1)
        do_filenames++
}
BEGINFILE {
    fcount = 0
    if (ERRNO && no_errors)
        nextfile
}
ENDFILE {
    if (! no_print && count_only) {
        if (do_filenames)
            print file ":" fcount
        else
            print fcount
    }

total += fcount
}
{
    matches = match($0, pattern)
    if (matches && full_line && (RSTART != 1 || RLENGTH != length()))
         matches = 0

if (invert)
        matches = ! matches

fcount += matches    # 1 or 0

if (! matches)
        next

if (! count_only) {
        if (no_print)
            nextfile

if (filenames_only) {
            print FILENAME
            nextfile
        }

if (do_filenames)
            if (line_numbers)
               print FILENAME ":" FNR ":" $0
            else
               print FILENAME ":" $0
        else
            print
    }
}
END {
    exit (total == 0)
}
function usage()
{
    print("Usage:\tegrep [-cilnqsvx] [-e pat] [files ...]") > "/dev/stderr"
    print("\tegrep [-cilnqsvx] pat [files ...]") > "/dev/stderr"
    exit 1
}