if ($INCOMING_TEXT ne "") {
$INCOMING_TEXT =~ s/([^=]|^|[^"])(http\:\/\/([\w.\/]+))/$1<a href=$2>$3</a>/gi;
}