puts [subst [regsub -all \\w+ [read stdin] "\[string le &\]_&"]]