C:\_32\comp\OpenGL>perl -MOpenGL -e "@x=1.0,0.0,0.0);$ref=\@x,OpenGL::glColor3f(@$ref)"

C:\_32\comp\OpenGL>