use OpenGL; sub glInit { glpOpenWindow(); } glInit(); print "Press return to exit\n"; while ( <> ) { exit; }