Select Code to Download

my $err_file = "error.log";
open(ERRLOG, "+>>logs/system/$err_file") or die "Could not open logfil
+e:$!\n";
...

flock(ERRLOG,8);
close(ERRLOG);