{n=$1 $1=_ $n="*" print for(;sub(/ \*/,"***");)print for(;sub(/\*\*/,FS);)print}
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page