Select Code to Download

#! perl -slw
use strict;
...
require OpenGL;
OpenGL->import( ':all' );
...

c:\test>GLex7.2.pl
Bareword "GL_FRONT" not allowed while "strict subs" in use at c:\test\
+GLex7.2.pl line 15.
...
Bareword "GLUT_RGBA" not allowed while "strict subs" in use at c:\test
+\GLex7.2.pl line 84.
Bareword "GLUT_DEPTH" not allowed while "strict subs" in use at c:\tes
+t\GLex7.2.pl line 84.
Execution of c:\test\GLex7.2.pl aborted due to compilation errors.

c:\test>GLex7.2.pl
from thread
...
Argument "GL_FRONT" isn't numeric in subroutine entry at c:\test\GLex7
+.2.pl line 15.
Argument "GL_AMBIENT" isn't numeric in subroutine entry at c:\test\GLe
+x7.2.pl line 15.
Unknown material parameter at c:\test\GLex7.2.pl line 15.