char m[999],a[99],*z,*p;i,l,f;main(c){for(z=m;gets(a);l?z=p:(f=l=i),*z++=10,--f||puts(m))for(i=0,p=z+l;c=a[i];*z++=l*i++&&f-1&&i-l?(c-32?*p++=c:0,32):c);}
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page