aparler/RosettaCodeData
1
0
Fork 0
Code Issues 12 Pull requests 3 Projects Releases Packages Wiki Activity Actions

Data update

Browse source
This commit is contained in:
Ingy döt Net 2024-07-13 15:19:22 -07:00
parent 29a5eea0d4
commit 5c1bb7bfa9
2011 changed files with 35081 additions and 3229 deletions
Download patch file Download diff file Expand all files Collapse all files

12
Task/URL-encoding/Langur/url-encoding.langur
View file

@ -1,6 +1,8 @@
val .urlEncode = fn(.s) replace(
.s, re/[^A-Za-z0-9]/,
fn(.s2) join "", map fn(.b) $"%\.b:X02;", s2b .s2,
)
val urlEncode = fn(s) {
replace(
s, re/[^A-Za-z0-9]/,
fn s:join("", map(fn b:"%{{b:X02}}", s2b(s))),
)
}
writeln .urlEncode("https://some website.com/")
writeln urlEncode("https://some website.com/")

4
Task/URL-encoding/PascalABC.NET/url-encoding.pas Normal file
View file

@ -0,0 +1,4 @@
##
function URLEncode(s: string) := System.Uri.EscapeDataString(s);
Println(URLEncode('http://foo bar/'));