f,s[1<<20];main(t){char*x=s+read(0,s,s),*p=s,*q=index(s,33);for(;x-p-510?*p:!puts(", world!");p+=f>>31|1)t=*p-44,f+=t-49?t==47&&f|!*x:-(f||*x),f?:t-18?t-16?t*t<2?*x=t?*x-t:*++q:write(1,x,t==2):--x:++x;}
Note that non-ascii characters in the above source code will be escaped (such as \x9f).