| Как закодировать и раскодировать строку %XX в URL. |
[исправить] |
Закодировать:
$toencode =~ s/([^a-zA-Z0-9_.-])/uc sprintf("%%%02x",ord($1))/eg;
Раскодировать:
$todecode =~ s/%(..)/pack("c",hex($1))/ge;
|
| |
|
|
27.08.2001
|
| Раздел: Корень / Программисту и web-разработчику / Perl / Regex (регулярные выражения) |
| 1.1, Alex (?), 07:14, 10/09/2003 [ответить]
| +/– |
 О мой бог! Выкиньте этот совет! А что - "value=20 20up" как по вашему тогда раскодируется? Пользуйтесь лучше функциями в mod_perl или в последнем CGI есть CGI::Util. (use CGI::Util qw(escape unescape)) и еще там есть полезности. | | |
| 1.2, Alex (?), 07:17, 10/09/2003 [ответить]
| +/– | |
Так. Кажется тут сайт тоже не совсем хорошо работает. Там было: value=20�x25;�x25;�x25;20up. Если опять не получится: 20(процент)(процент)(процент)20up. Должно раскодировать как "20(процент)(пробел)up" | | |
| 1.3, fisher (??), 10:30, 20/03/2005 [ответить]
| +/– |
 $todecode =~ s/%([a-fA-F0-9]{2})/pack("c",hex($1))/ge;
$toencode =~ s/%%/%/ge;
| | |
| 1.4, HHBak (?), 12:17, 06/06/2005 [ответить]
| +/– |
 $toencode =~ s/([a-zA-Z0-9_.-])/uc sprintf("%%%02x",ord($1))/eg;
"^" нафига там?.. С ним ничего не закодирует. | | |
| |
| 2.7, дед Вано (?), 11:21, 18/03/2009 [^] [^^] [^^^] [ответить]
| +/– |
 если ди ви ди, то DVD Architect v3.0 и выше...
а если си-ди то прогой alw_45_march_3
а ломать защиту FairUse5WM.
| | |
|
|