$word = "'<a href="/forum">Форум</a>'";
$site = "http://www.sql.ru";
$page = file_get_contents ( $site );
$count_words = preg_match_all ( $word, $page, $matches );
echo 'Количество найденных ссылок: ', $count_words, '
';
print_r ( $matches );

/**   
* Основная функция интерпретатора
* @param string $text   //обрабатываемый текст
* @return string 
*/   
    function createBBtags($text, $replace = true)
    {   
/**
Разбираем массивы. 
Это для более удобной конфиги (их вообще то можно было сразу в разные прописать).
Ну а что бы не дергать каждый раз, объявим статическими.
*/            
        static $bb_open, $bb_close, $bb_single, $tmp_open, $tmp_close, 
               $tmp_single, $max_len, $links, $images, $video, 
               $html_open, $html_close, $html_single, $formatters;
            
            if(empty($bb_open))
            {
                global $configBBcode;
                extract($configBBcode);
            
                $bb_open      = array_keys($setup_bb);
                $bb_close     = array_values($setup_bb);                                                        
                $html_open    = array_keys($setup_html);
                $html_close   = array_values($setup_html);
                $bb_single    = array_keys($single_tags);
                $html_single  = array_values($single_tags);
            } 
        
    //  Oчистим текст от иероглифов
        $text = str_replace($tmp_open, '', $text);
        $text = str_replace($tmp_close, '', $text);
        $text = str_replace($tmp_single, '', $text);
                  
        $text = str_replace("\r", "", $text);
        $text = str_replace("\t", "    ", $text);
        
/**  
Если режим очистки - 
удаляем бб-теги из текста
*/                  
    if(!$replace)
    {              
        $text = str_replace($bb_open, '', $text);
        $text = str_replace($bb_close, '', $text);
        $text = str_replace($bb_single, '', $text);
        $text = preg_replace('#\[(code|url|img|video)[^\s]*?\].*?\[/\\1\]#usi', '', $text); 

    }
    else
    {        
/** 
Если включен режим bb-тегов, 
заменим заявленные теги на одиночные символы и дальше по тексту 
Используется функция str_ireplace(), чтобы BB-теги были регистронезависимыми
*/ 

                   
        $text = str_ireplace($bb_open, $tmp_open, $text);
        $text = str_ireplace($bb_close, $tmp_close, $text);
        $text = str_ireplace($bb_single, $tmp_single, $text);   
/** 
Начинается разбор полетов. Сначала уничтожаем пустые теги.
Тут же за одно считаем, сколько открывающих и сколько закрывающих
*/ 
        $open_cnt = array();
   
        foreach($tmp_open as $k => $v)
        {
           $text = preg_replace("#". $v ."\s*?". $tmp_close[$k] ."#us", "", $text);
           $cnt = substr_count($text, $v);
           
           if($cnt > 0)
           {
               $open_cnt[$v] = $cnt;
               $close_cnt[$v] = substr_count($text, $tmp_close[$k]);
           }              
        }
        
/** 
Дальше уничтожаем непарные теги
Регулярка составлена так, что удаляет последний заявленный символ
Это дает возможность удалить незакрытые теги с конца текста,
не трогая закрытые.
*/     
        foreach($open_cnt as $k => $v)
        {
                
            if($v > $close_cnt[$k])
            {
                for($i = 0; $i < $v - $close_cnt[$k]; ++$i)
                    $text = preg_replace('#'. $k .'(?!.*'. $k .')#us', '', $text);
            }
        
        }
    }             
// Обрабатываем текст 
       
        $text = mBwordwrap($text, 100);                 
        $text = ($text);
   
           
        //Функция getFormat() сама разберется, какой форматтер использовать. 
        if(count($formatters))
            $text = preg_replace_callback('#\[code=([^\] ]+?)\](.+?)\\\1\]#si', 'getFormat', $text);         
        //Обработка ссылок. Пройдут только те, которые начинаются с http:// и https:// и не содержат пробелов        
        if($links)
        {                   
            $text = preg_replace_callback('#\http(s*)://([^\] ]+?)\](.+?)\[/url\]#si', 'createLink1', $text);
            $text = preg_replace_callback('#\\]http(s*)://(.+?)\[/url\]#si', 'createLink2', $text);
            $text = str_replace ("&amp;", "&", $text);
        }    
        //Картинки. Тоже http:// и без пробелов. На вс. случай запретим GET параметры      
        if($images)    
            $text = preg_replace_callback('#\[img\]http://([^\] \?]+?)\[/img\]#si', 'createImg', $text); 
            
        //Видео. Та же песня      
        if($video)    
            $text = preg_replace_callback('#\[video\]http://([^\] \?]+?).flv\[/video\]#si', 'createSwf', $text);         
             
/** 
Если включен режим bb-тегов,
меняем обратно временные символы на HTML теги
*/    
    if($replace)
    {       
        $text = str_replace($tmp_open, $html_open, $text);
        $text = str_replace($tmp_close, $html_close, $text);
        $text = str_replace($tmp_single, $html_single, $text);
    }        
// Сохраняем оригинальное форматирование                
        $text = str_replace('  ', '&nbsp;&nbsp;', $text);    
        $text = nl2br($text);
// За ушкО на солнышкО                       
        return $text;            
    }