BEGIN{RS=FS}{for(;i++<NF;){for(j=i;--j&&$i>$j&&$i-$j<10;);for(k=i;k++<NF&&$i>$k&&$i-$k<10;);print $i(k<=NF&&$i-$k>9&&$i-$j>9?"*":_)}}
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page