/* REXX *** */
do i = 1 to __environment.0
    PARSE VAR __environment.i name'='value
    x=value(name, value)
    Say name' = 'value(name)
    end
exit 0