Quelltext betrachten

Aus Weis nix

für Perl:UrlEncode

Wechseln zu: Navigation, Suche

Du bist nicht berechtigt, die Seite zu bearbeiten. Grund:

Diese Aktion ist beschränkt auf Benutzer, die der Gruppe „Benutzer“ angehören.

Quelltext dieser Seite:

<code lang="perl">
sub URLEncode {
 my $theURL = $_[0];
 my $MetaChars = quotemeta( ';,/?\|=+)(*&^%$#@!~:');
 $theURL =~ s/([$MetaChars\"\'\x80-\xFF])/"%" .
 uc(sprintf("%2.2x",         ord($1)))/eg;
 $theURL =~ s/ /\+/g;
 return $theURL;
}
</code>

Zurück zur Seite Perl:UrlEncode.

Von „http://config.zerosub.de/index.php/Perl:UrlEncode“

Ansichten

Persönliche Werkzeuge

Suche

Werkzeuge