Вопрос
Как выполнить обратное преобразование нормального текста в символы, например, %F2 ?
Ответ
$s =~ tr/+/ /;
$s =~ s/([\x00-\x1F\x7F\xFF])/ sprintf '%%%02X', ord($1) /eg;
Copyright 2000-2004 Сообщество Чайников
Контактная информация