Автор Тема: Кодирование URL  (Прочитано 2846 раз)

0 Пользователей и 1 Гость просматривают эту тему.

Оффлайн AlieN

  • Абыр!=)
  • Ветеран
  • *****
  • Сообщений: 1315
  • +0/-1
  • 2
    • Просмотр профиля
Кодирование URL
« : 21 Августа 2002, 17:02:05 »
как закодировать что-то либо дабы это "что-либо"(?,=&и т.д. русские символы) нормально передалось?

в пхп это делается одной функция urlencode а в перле?
The Chemical Brothers - Hey Boy Hey Girl (User Friendly Mix)
Peter Presta pres - Set Sail(Peter Presta Apple Jaxx Dub) She S.Sunshine Feat Mila - Bring The Beat Back (Club Mix) Jerry Ropero - Home Alone (Dub Mix)

Unregistered

  • Гость
Кодирование URL
« Ответ #1 : 21 Августа 2002, 17:57:06 »
В перле вроде нет такой функции. Тебе самому все преобразования символов надо будет делать.

Unregistered

  • Гость
Кодирование URL
« Ответ #2 : 21 Августа 2002, 18:02:45 »
Зато есть модуль ЦГИ.пм
Если не хочешь использовать модуль, взгляни в его исходники, и вытащи то, что тебе нужно. Кстати очень часто встречается эта функция в скриптах, написанных ненавистниками ЦГИ.пм В среднем, перерыв скриптов 10, ты увидишь готовое решение

__________________
глебушка я!

Оффлайн AlieN

  • Абыр!=)
  • Ветеран
  • *****
  • Сообщений: 1315
  • +0/-1
  • 2
    • Просмотр профиля
Кодирование URL
« Ответ #3 : 21 Августа 2002, 18:51:47 »
Unregistered
ну блин пример покажите с cgi.pm
The Chemical Brothers - Hey Boy Hey Girl (User Friendly Mix)
Peter Presta pres - Set Sail(Peter Presta Apple Jaxx Dub) She S.Sunshine Feat Mila - Bring The Beat Back (Club Mix) Jerry Ropero - Home Alone (Dub Mix)

ююю

  • Гость
Кодирование URL
« Ответ #4 : 21 Августа 2002, 22:04:01 »
$str=\'name=ююю&city=Караганда\';
while($str=~m/&?(.*?)=(.*?)(?:&|$)/g){
   ($name,$value)=($1,$2);
   $value=~s/([^a-zA-Z0-9.*_ @-])/\'%\' . sprintf "%lx", ord($1)/eg;
   $urlencode.="$name\\=$value&";
}
chop $urlencode;
print $urlencode;

PS Дело было вечером Выпить было нечего
Ну и не больно то и хотелось

Unregistered

  • Гость
Кодирование URL
« Ответ #5 : 21 Августа 2002, 22:29:06 »
ОПСС

$str=\'name=ююю&city=Караганда\';
while($str=~m/&?(.*?)=(.*?)(?:&|$)/g){
   ($name,$value)=($1,$2);
   $value=~s/([^a-zA-Z0-9.*_ @-])/\'%\' . sprintf "%lx", ord($1)/eg;
   $value=~s/ /+/g;
   $urlencode.="$name\\=$value&";
}
chop $urlencode;
print $urlencode;

Но всё равно криво работать будет

Оффлайн glebushka

  • студент
  • Ветеран
  • *****
  • Сообщений: 944
  • +0/-0
  • 2
    • Просмотр профиля
    • http://www.intellectuals.ru
Кодирование URL
« Ответ #6 : 22 Августа 2002, 00:04:57 »
ЦГИ.пм пофигу Гет или Пост и в том и другом случае:

my $Objekt=new CGI;#создаём объект cgi
my $File = $Objekt->param("file");
my $Path= $Objekt->param("path");
и т.д.
Ну к чему все это, лучше бы водки выпили...

 

Sitemap 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28