That can't be all the code, it only prints to OUT, not OUT and STDOUT.

Look at File::Tee for an easy way to output to two filehandles. Plus put a 'or die' after the open or 'use autodie'. My guess is that the user running the CGI script can't open the output file.