> Gerald Richter wrote:
>
> > > I am making too:
> > >
> > > $url="edit.html\?";
> > > foreach $i ( keys %fdat)
> > > {
> > > $_=$fdat{$i};
> > > s/([^a-zA-Z0-9-._])/uc sprintf("%%%02x",ord($1))/eg;
> > > $url.="$i=$_\&";
> > > }
>
>
>
> > > Another quistion: how use 'struct tCharTrans Char2Url' in perl code
> > > for escaping any strings?
>
> > I can put it on the TODO list, but there are other perl modules (CGI, LWP)
> > which can do the job for you, so I don't give it a very high priority
>
> Ok!
>
> P.S. I search std. function for escaping, but don't found anywhere in
> perl modules. Only internal in CGI.pm I found this string 's/([^a-zA-Z0-9-._]) ...',
> but without possible to call function from my code.
Use the escape and unescape functions in CGI.pm to URL encode text
CGI::escape('text to escape');
CGI::unescape('text to unescape');
--
Geoff Crawshaw
CTO
TimeBills.com Inc.
[EMAIL PROTECTED]
http://www.timebills.com
