Wieder mal eine RegEx-Optimierungs-Frage - #96860 (Allgemeines zu Perl)

ptk

2007-07-30 22:58

User since
2003-11-28
3645 Artikel
ModeratorIn
[default_avatar]

Nimm doch gleich CGI, damit wird auch URI-Escaping richtig gehandhabt:

Code (perl): (dl )

use CGI qw();
use Data::Dumper qw(Dumper);

for my $x ("...?q=Suchbegriff", "?...=...&q=Suchbegriff") {
    my($qs) = $x =~ m{\?(.*)};
    print Dumper({CGI->new($qs)->Vars});
}
__END__

(Juhu! Ich kann __END__ schreiben!)