ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Dmitriy Goldobin                     2:5020/400     20 Apr 2000  10:26:14
 To : All
 Subject : query_string
 -------------------------------------------------------------------------------- 
 

 Hi!
 
 Если кому неохота цеплять немаленький CGI.pm _только_ для
 разбора query_string - вот я себе такую портянку сделал,
 может кому пригодится. А заодно проверить хочу на халяву,
 нигде ли я не ошибся, а может и подсократить что можно...
 Здесь критиканов много обитает :)
 
 my %params = map {tr/+/ /;s/%([\dA-F]{2})/chr hex $1/gei;$_}
 map {split /=/,$_,2} split /[&;]/, $ENV{QUERY_STRING} || "";
 
 Bye.
 --- ifmail v.2.15dev4
  * Origin: Electronic Microsystems JSC (2:5020/400)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор