The solution is to roll your own lookahead and lookbehind. Since the apparent intent is to avoid substituting in the middle of words,

$message =~ s|(?<!\w)\Q$face\E(?!\w)| <img src="$location" alt="$name"
+> |gi
[download]

should work.