ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Alexander Dzyubenko                  2:5020/400     23 Jun 2000  03:18:55
 To : All
 Subject : Re: URL Encode
 -------------------------------------------------------------------------------- 
 

 Спасибо!
 
 Artem Chuprina wrote...
 
 > # URL-encode data
 > sub escape {
 >   shift() if ref($_[0]) || (defined $_[1] && $_[0] eq $CGI::DefaultClass);
 >   my $toencode = shift;
 >   return undef unless defined($toencode);
 >   $toencode=~s/([^a-zA-Z0-9_.-])/uc sprintf("%%%02x",ord($1))/eg;
 >   return $toencode;
 > }
 --- ifmail v.2.15dev5
  * Origin: DzSoft Ltd. (2:5020/400)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор