Opened by ak47 at 2003-10-02 16:55
User since
2003-08-04
12208 Artikel
Admin1
![[Homepage]](/battie/theme/default/homepage.gif)
2003-08-04
12208 Artikel
Admin1
[quote=ak47,02.10.2003, 15:31] ($name, $value) = split(/=/, $pair);
$value =~ s/\%0D%0A/\<br>/g;
$value =~ tr/+/ /;
$value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
$value =~ s/~!/ ~!/g;[/quote]
du weisst aber schon, dass es für sowas das modul CGI.pm
gibt und du das auch stattdessen benutzen solltest?
$value =~ s/\%0D%0A/\<br>/g;
$value =~ tr/+/ /;
$value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
$value =~ s/~!/ ~!/g;[/quote]
du weisst aber schon, dass es für sowas das modul CGI.pm
gibt und du das auch stattdessen benutzen solltest?
Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
lesen:
Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
lesen:
Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem