{for(OFS=FS=_;i++<2^NF;){print$0=$0 for(j=NF;j&&"a">$j=$j>"Z"?toupper($j):tolower($j);)j--}}
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page