UPNP toys in erlang