Re: [perl #24704] Regex replace looses chars

-----BEGIN PGP SIGNED MESSAGE-----

Moin,

>[Please enter your report here]
>
>perl -le '$_="65x"; print; s/65/chr/e; print; print unpack("H*", $_)'
>65x
>Ax
>4178
>
>This is normal.
>
>perl -le '$_="x65x"; s/x//; print; s/65/chr/e; print; print unpack("H*", $_)'
>65x
>A
>4100
>
>Where did the second x go ????

Confirmed on v5.8.1 and v5.8.2.

Cheers,

Tels

- -- 
 Signed on Sat Dec 20 21:55:18 2003 with key 0x93B84C15.
 Visit my photo gallery at http://bloodgate.com/photos/
 PGP key on http://bloodgate.com/tels.asc or per email.

 "Call me Justin, Justin Case."

-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.2.2-rc1-SuSE (GNU/Linux)
Comment: When cryptography is outlawed, bayl bhgynjf jvyy unir cevinpl.

iQEVAwUBP+S3encLPEOTuEwVAQGE7Af+PdAqt3NEBJHj3JXMYeXy6Abjs21BPNQM
g0VWYWXn+8zXi5qvpLEPFP1cUOqVTVaqC4C/T4gLI60utdNdr9JUZT47nftJk9Bz
8Ct47wf5tiOSzJt4qjFKJ8bhIkA0GcDNwiEGLXkoCM1GdtyAbeGKs9KfZSyuLews
4CcPrSiViPdK7WPr/aV5CX3fF3mfQ7sIQ/hI3hU+EKQmoOlpH0AI246IwHw9MhF5
5xm8ikikGAh3nIyDt65Da6m2IKPaT0SZNEv06hr7mkDG8jO8EkdvvbqhZVZ/kwAn
PXm1C8QbCotslQ5R/x7OA7EEnXmmqebmdBmpzP62SOoO6Hyqyi9rMw==
=2GmU
-----END PGP SIGNATURE-----

• Re: [perl #24704] Regex replace looses chars by Tels
• [perl #24704] Regex replace looses chars by perlbug-followup
• [PATCH] Re: [perl #24704] Regex replace looses chars by Marty Pauley
• Re: [PATCH] Re: [perl #24704] Regex replace looses chars by Nicholas Clark
• Re: [PATCH] Re: [perl #24704] Regex replace looses chars by Marty Pauley
• Re: [PATCH] Re: [perl #24704] Regex replace looses chars by Nicholas Clark
• Re: [perl #24704] Regex replace looses chars by SADAHIRO Tomoyuki
• Re: [perl #24704] Regex replace looses chars by SADAHIRO Tomoyuki
• Re: [perl #24704] oldest bug in current perl? (Regex replace looses chars) by Andreas J Koenig