Setting $escmode to 1 using local doesn't seem to work.

Using embperl 1.36:
[- $escmode=1 -]<a href=[+ do { '&' } +]>html escaped</a>
<a href=[+ do { local $escmode=1; '&' } +]>html escaped?</a>
<a href=[+ do { local $escmode=2; '&' } +]>url escaped</a>

yields:
<a href=&amp;>html escaped</a>
<a href=&>html escaped?</a>
<a href=%26>url escaped</a>

as you can see,
the second line (with the local $escmode=1) does _not_ get html escaped.

the same thing happens using a different nonlocal $escmode, and with
$escmode value of 5.

---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to