function text_to_links ($data=\'\') {
  if(empty($data)) { return $data; }
  $lines = split(\"\\n\",$data);
  if(strpos($data,\"<html\"))
        return $data;
  while ( list ($key,$line) = each ($lines)) {
    $line = eregi_replace(\"([ \\t]|^)www\\.\",\" http://www.\",$line);
    $line = eregi_replace(\"([ \\t]|^)ftp\\.\",\" ftp://ftp.\",$line);
    $line = eregi_replace(\"(http://[^ )\\r\\n]+)\",\"<A href=\\\"\\\\1\\\" target=\\\"_blank\\\">\\\\1</A>\",$line);
    $line = eregi_replace(\"(https://[^ )\\r\\n]+)\",\"<A href=\\\"\\\\1\\\" target=\\\"_blank\\\">\\\\1</A>\",$line);
    $line = eregi_replace(\"(ftp://[^ )\\r\\n]+)\",\"<A href=\\\"\\\\1\\\" target=\\\"_blank\\\">\\\\1</A>\",$line);
    $line = eregi_replace(\"([-a-z0-9_]+(\\.[_a-z0-9-]+)*@([a-z0-9-]+(\\.[a-z0-9-]+)+))\",\"<A HREF=\\\"mailto:\\\\1\\\">\\\\1</A>\",$line);
    $newText .= $line . \"\\n\";

  }

  return $newText;

}