BEGIN
{
	use CGI::Carp qw(carpout);
	open(LOG, ">>/Logs/Report.log") && carpout(\*LOG);
	carpout('LOG');
}