contrib/awk/test/gsubtest.awk


1
2
3
4
5
6
7
8

BEGIN {
	str = "abc"; print gsub("b+", "FOO", str), str
	str = "abc"; print gsub("x*", "X", str), str
	str = "abc"; print gsub("b*", "X", str), str
	str = "abc"; print gsub("c", "X", str), str
	str = "abc"; print gsub("c+", "X", str), str
	str = "abc"; print gsub("x*$", "X", str), str
}