4 lines
201 B
Text
4 lines
201 B
Text
URLDecoding[url_] :=
|
|
StringReplace[url, "%" ~~ x_ ~~ y_ :> FromDigits[x ~~ y, 16]] //.
|
|
StringExpression[x___, Longest[n__Integer], y___] :>
|
|
StringExpression[x, FromCharacterCode[{n}, "UTF8"], y]
|