[scripts perl][teleop]

* cuda : manage NO CUDA path
* teleop nao : better code