/
githubmirror
/
gawk
Обзор
Документация
Войти
/
githubmirror
/
gawk
Код
Запросы
0
Пакеты
0
Релизы
0
Аналитика
Безопасность
master
test/regrange.awk
30 строк
541 B
Arnold D. Robbins
Rationalize range expansion in regexps.
31 май 2011, 23:52
31 май 2011, 23:52
c2efba1
Код
Авторство
О чём код?
# Tests due to John Haque, May 2011 # # The following should be fatal; can't catch them inside awk, though # $> echo 'a' | ./gawk '/[z-a]/ { print }' # $> echo 'A' | ./gawk '/[+-[:digit:]]/' BEGIN { char[1] = "." pat[1] = "[--\\/]" char[2] = "a" pat[2] = "[]-c]" char[3] = "c" pat[3] = "[[a-d]" char[4] = "\\" pat[4] = "[\\[-\\]]" char[5] = "[.c.]" pat[5] = "[a-[.e.]]" char[6] = "[.d.]" pat[6] = "[[.c.]-[.z.]]" for (i = 1; i in char; i++) { printf("\"%s\" ~ /%s/ --> %d\n", char[i], pat[i], char[i] ~ pat[i]) } }