my ($username, $message, $date, $ip) = split(/<!!>/, $line);
   while ($sth->fetch)
   {
      $message =~ s|(?<!\S)\Q$face\E(?!\S)| <img src="$location" alt="$name"> |gi;
      print "$face<br>";
   
   }