# open for append
  open FILE, ">>$g_db_logfile";

  # wait for lock
  flock (FILE,LOCK_EX);
  
  # once lock is granted seek to end, JIC
  seek (FILE,0,2);
  
  # print the string
  print FILE "$logstr\n";
  

  # unlock file
  flock (FILE,LOCK_UN);
  
  # close file
  close FILE;