urlencoded ( -- assoc )

Vocabulary

cgi.private

Inputs

None

Outputs

assoc

an object

Definition

USING: environment io kernel math.parser sequences ;

IN: cgi.private

: urlencoded ( -- assoc )
    "CONTENT_LENGTH" os-env [ string>number ] [ 0 ] if* read
    [ "" ] [ "&" append ] if-empty "QUERY_STRING" os-env
    [ append ] when* query-string ;