Forum Webscript.Ru

Программирование => Perl => Тема начата: Biggelow от 12 Мая 2009, 14:19:53

Название: и снова кодировка
Отправлено: Biggelow от 12 Мая 2009, 14:19:53

Проблема вот в чем:
скрипт отправляет браузеру методом get русские буквы в виде %D1%D2 и т.д. Если пересылать обратно скрипту строчку типа:
print("Location: sript.pl?переменная=значение"), то в строке она уже обозначается не %D1%D2, а именно значение и скрипт ругается.

Как перекодировать строчку с русскими буквами обратно в вид %D1%D2?

Название: и снова кодировка
Отправлено: ravshaniy от 13 Мая 2009, 00:05:54

Код: [Выделить]


use CGI::Util qw(escape);

$url = \'Location: sript.pl?переменная=значение\';

print(escape($url));

подойдет?

Название: и снова кодировка
Отправлено: Biggelow от 13 Мая 2009, 12:47:06

Помогло. Спасибо!