s/\b([A-Z]+)\b/lc $1/eg;
s/^( +)/"#" x length $1/e; s/ +/ /g; tr/#/ /;
s/^\s+(\S)/    $1/;
s/^\s+grant/grant/;