use CGI::Carp qw(fatalsToBrowser); BEGIN { print CGI::header(); open (STDERR, '>>mylog.log'); }