I apologise for indenting my code, which I should have realised would break it. D'oh. Either remove the indentation, or grab it from http://www.kitsite.com/~robin/ou-x-po/japh-prisoner.pl Or, indeed, from below. .robin. -- s==x= && s==.er & xac.uc coer= && s==m--+m--+m--+m--=e && s==xac.~o= && s=.+=<<x& evam=ee && eva~ x s=c.=c= && s=x=xz&<<o=e && xm o s=x=x = && s=x=<<xc& <<xo =e&& x~ xc xm xo s=x=xer= && s=x=xr& xu=e && s=x=xer = && s=x=xx & uc xn=e && s=.=xu & <<o=e && x~ o s=x=x ano= && s=x=xu & <<o=e && x~ o s=x=xus= && s=x=xo & uc xz=e && s= == && s=.== && s=.+=reverse uc=e && s=.= r= && s=.+=reverse uc=se && warn uc ==== Want to unsubscribe from Fun With Perl? Well, if you insist... ==== Send email to <fwp-request@technofile.org> with message _body_ ==== unsubscribe