{for(n=$0;i<n;){$0=_;a=i<n-1;OFS=a*i?FS:"Z";$(n-a*i++)="Z";print}}

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return to the top page