wd|.(#~#$0,1:)'_'}.@}:@r' _'r|:'__||'(r=:(rplc _2<\4{.])"1~)'_'P}' '$~3+s>P=:;/1+(-"1<./)(,2%~2+/\])3 :',/((1+-:(s=:>./-<./)y)*"1]_2]\1|.4#_1 1)+"1"_1(>(-.;];];<:)=i.2)+/ .*"2 1/y'^:(".stdin load'csv'),:0 0
Note that non-ascii characters in the above source code will be escaped (such as \x9f).