open(my $log_handle, '>>', $filename)
  or die "can't open log file \"$filename\" for appending: $!";