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=&>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]