Select Code to Download

 my $screen_surface = SDL::Video;
 $screen_surface->set_video_mode($screen_width, $screen_height, 32, SD
+L_ANYFORMAT) or die $!;