shithub: bin.rc

ref: c240c428481aa4cd9aadeb95833161b52efc1e96
dir: /bin/i-/

View raw version 
#!/bin/awk -f
BEGIN{
	n = 1
	if(ARGC > 1){
		n = ARGV[1]; ARGC--
	}
	for(i = 1; i < 50; i++)
		tabs[i] = tabs[i-1] "	"
}
{
	if(match($0, /^	+/) == 0){
		print
		next
	}
	sub(/^	+/, tabs[RLENGTH-n])
	print
}