wd(a;' ',a=.LF,'T')rxrplc(<:".2{.d)foldtext 3}.d=:stdin load'text regex'