/PerlTQt/examples/opengl/gear/