4.4BSD/usr/src/contrib/gawk-2.15.2/test/anchgsub.awk

{ gsub(/^[ 	]*/, "", $0) ; print }