|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Dmitriy Goldobin 2:5020/400 20 Apr 2000 10:51:29 To : All Subject : Re: query_string --------------------------------------------------------------------------------
Hi!
> my %params = map {tr/+/ /;s/%([\dA-F]{2})/chr hex $1/gei;$_}
> map {split /=/,$_,2} split /[&;]/, $ENV{QUERY_STRING} || "";
первая поправка - {split /=|$/,$_,2}
Bye.
--- ifmail v.2.15dev4
* Origin: Electronic Microsystems JSC (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/219561ecb816f.html, оценка из 5, голосов 10
|