СообЧа > База Знаний > Интернет > Веб-строительство > Perl

Вопрос

Как переводить вот такое «%C3%E0%E7%E5%F2%E0+%E1%» в нормальный текст?

Ответ

$s =~ tr/+/ /;
$s =~ s/%([a-fA-F0-9]{2})/pack("C", hex($1))/eg;



Copyright © 2000-2004 Сообщество Чайников
Контактная информация