<?
    
function word_wrap_new($sentince$nl2br 0$chars 50)
    {
        
$return '';
        while (
strstr($sentince'  '))
        {
            
$sentince str_replace('  '' '$sentince);
        }
        if (
$nl2br)
        {
            
$sentince str_replace("\r"''str_replace("\n"' [CRLF] '' ' $sentince ' '));
        }
        else
        {
            
$sentince str_replace("\r"''str_replace("\n"' '' ' $sentince ' '));
        }
        
$words explode(' '$sentince);
        foreach (
$words AS $word)
        {
            if (
$word)
            {
                if (
strstr(strtolower($word), 'http://') !== false || strstr(strtolower($word), '.com') !== false || strstr(strtolower($word), '.org') !== false || strstr(strtolower($word), '.net') !== false)
                {
                    if (
strlen($word) <= 40)
                    {
                        if (
strstr(strtolower($word), '@'))
                        {
                            
$return .= ($return ' ' '') . '<a href="mailto:">' $word '</a>';
                        }
                        else
                        {
                            
$return .= ($return ' ' '') . '<a href="' . (substr($word07) == 'http://' '' 'http://') . $word '">' . (substr($word07) == 'http://' '' 'http://') . $word '</a>';
                        }
                    }
                    else
                    {
                        if (
strstr(strtolower($word), '@'))
                        {
                            
$return .= ($return ' ' '') . '[<a href="mailto:">email</a>]';
                        }
                        else
                        {
                            
$return .= ($return ' ' '') . '[<a href="' . (substr($word07) == 'http://' '' 'http://') . $word '">link</a>]';
                        }
                    }
                }
                else
                {
                    
$return .= ($return ' ' '') . wordwrap($word$chars' '1);
                }
            }
        }
        if (
$nl2br)
        {
            
$return str_replace('[CRLF]'"\r\n"$return);
        }
        return 
trim($return);
    }
?>