Avoir des liens et les emails cliquables dans un texte

<?php
/******************************************************************************/
/*                                                                            */
/*                       __        ____                                       */
/*                 ___  / /  ___  / __/__  __ _____________ ___               */
/*                / _ \/ _ \/ _ \_\ \/ _ \/ // / __/ __/ -_|_-<               */
/*               / .__/_//_/ .__/___/\___/\_,_/_/  \__/\__/___/               */
/*              /_/       /_/                                                 */
/*                                                                            */
/*                                                                            */
/******************************************************************************/
/*                                                                            */
/* Titre          : Avoir des liens et les emails cliquables dans un texte    */
/*                                                                            */
/* URL            : http://www.phpsources.org/scripts412-PHP.htm              */
/* Auteur         : netphotos                                                 */
/* Date édition   : 14 Juin 2008                                              */
/* Website auteur : http://www.actuphoto.com                                  */
/*                                                                            */
/******************************************************************************/


// le texte ou l on va rendre les email et les urls cliquables 
$in = array( 
'`([[:alnum:]]([-_.]?[[:alnum:]])*@[[:alnum:]]([-_.]?[[:alnum:]])*\.([a-z]{2,' .
'4}))`',); 
$out = array( 
'<a href="mailto:email@email.com" onmouseout="return nd();">Contacter</a>',);
$texte = eregi_replace(
"(((ftp://)|(http(s?)://))(([[:alnum:]]|[-\%\.\?\=\#\_\:\&\/\~\+\@\,\;])*))",
"<a href = '\\0' target='_blank' >Consulter le lien</a>",$texte);
$texte = eregi_replace(
"(([^/])www\.|(^www\.))(([[:alnum:]]|[-\%\.\?\=\#\_\:\&\/\~\+\@\,\;])*)",
"\\2 <img src ='img/link.gif'  border='0' ><a href = 'http://www.\\4'" .
" target='_blank' >Consulter le lien</a>",$texte);
echo preg_replace($in, $out, $texte);
session_register("$1");

?>