llInstantMessage(CORRADE,
    wasKeyValueEncode(
        [
            // set the light data of a primitive
            // in a 4 meter range named "Bulb"
            "command", "setprimitivelightdata",
            "group", wasURLEscape(GROUP),
            "password", wasURLEscape(PASSWORD),
            "item", "Bulb",
            "range", 4,
            "data", wasURLEscape(
                wasListToCSV(
                    [
                        "Intensity",
                        1,
                        "Radius",
                        10
                    ]
                )
            ),
            "callback", wasURLEscape(URL)
        ]
    )
);