On Thu, Nov 10, 2005 at 05:33:28AM -0800, rajarshi das wrote:
> Hi,
> The following worked in perl-5.005_03 on ebcdic.
>
> $value = "http%3A%2F%2Fw3.pok.ibm.com%2Fpokcomm%2Fthanks.html";
> $value =~ s/%([a-fA-F0-9]{2})/pack('E',chr(hex($1)))/ge;
> print "value : $value\n";
>
> $value is set to "http://w3.pok.ibm.com/pokcomm/thanks.html";
AFAIKT, the 'E' option is *not* present in the standard 5.005_03 perl
distribution; if it works with your perl binary, then it must be a
non-standard modification.
>
> A few qns here :
> 1) Is there some utility in perl-5.8.7 that can replace pack('E',<>) in
> the above regular expression ?
tell us what the 'E' is supposed to do and we may be able to help
> 2) Is it allowed to add a case 'E' in the pp_pack.c code in perl-5.8.7
> to do this ?
Again, it depends on what the E is supposed to do.
--
Monto Blanco... scorchio!
