use List::Util; sysopen (my $logHdl, "C:/directory1/directory2/directory3/logs/LOGFILE.txt", O_RDWR | O_CREAT) or die "Content-type: text/html\n\nCannot open file for writing. ".$!;