URL encoding: Difference between revisions
Content deleted Content added
Thundergnat (talk | contribs) →{{header|Perl 6}}: Add Perl 6 solution |
|||
Line 72:
say $s = CGI::escape($s);
say $s = CGI::unescape($s);</lang>
=={{header|Perl 6}}==
<lang perl6>my $url = 'http://foo bar/';
say $url.subst(/(<-[A..Za..z0..9]>)/, -> $/ { sprintf "%%%0X", $0.ord }, :g);</lang>
Output:
<pre>
http%3A%2F%2Ffoo%20bar%2F
</pre>
=={{header|PicoLisp}}==
| |||