C:\>perl -MOpenGL=":all" -e "glutInit();glutCreateWindow('Test');sleep 2;"