test

Теги:
 
+
-
edit
 
+
-
edit
 

Balancer

администратор
★★★★★
[test]12345[/test]
123
123
 
Это сообщение редактировалось 04.06.2004 в 18:33
+
-
edit
 

Balancer

администратор
★★★★★
:help:
 
Это сообщение редактировалось 04.06.2004 в 20:06
+
-
edit
 

Balancer

администратор
★★★★★
http://www.ru
 
Это сообщение редактировалось 05.06.2004 в 12:57
+
-
edit
 
+
-
edit
 
+
-
edit
 
+
-
edit
 

Balancer

администратор
★★★★★
code php
  1. <?
  2.     // URLs processing
  3.     // Global vars: none
  4.     //
  5.     // (c) Balancer 2003-2004
  6.     // 07.06.04 исправлена обработка ссылок, "упирающихся" в тэг, например, <li> http://www.ru/<li>
  7.  
  8.     function lcml_strip_url($url)
  9.     {
  10.             return strlen($url)>77?substr($url,0,50).' [ ... ] '.substr($url,-20):$url;
  11.     }
  12.  
  13.     function lcml_urls_title($url)
  14.     {
  15.         require_once "HTTP/Request.php";
  16.         $req =& new HTTP_Request($url);
  17.         $req->addHeader("Content-Encoding", 'gzip');
  18.        
  19.         $req->sendRequest();
  20.  
  21.         if(PEAR::isError($response))
  22.             return lcml_strip_url($url);
  23.  
  24.         $location = $req->getResponseHeader('Location');
  25.         if($location)
  26.         {
  27.             if(substr($location,0,1)=='/')
  28.             {
  29.                 $ura =  parse_url($url);
  30.                 $location=$ura['scheme'].'://'.$ura['host'].$location;
  31.             }
  32.             $req->setURL($location);
  33.             $req->sendRequest();
  34.             if(PEAR::isError($response))
  35.                 return lcml_strip_url($url);
  36.         }
  37.  
  38.         $data = $req->getResponseBody();
  39.  
  40.         $content_type = $req->getResponseHeader('Content-Type');
  41.         if(preg_match("!charset=(\S+)!i",$content_type,$m))
  42.             $charset = $m[1];
  43.         else
  44.             $charset = '';
  45.  
  46.         if(preg_match("!<meta http\-equiv=\"Content\-Type\"[^>]+charset=(.+?)\">!i",$data,$m))
  47.             $charset = $m[1];
  48.  
  49.         if(preg_match("!<title>(.+?)</title>!is",$data,$m)) //@file_get_contents($url)
  50.         {
  51.             if($charset)
  52.                 $m[1] = iconv($charset,'utf-8//translit', $m[1]);
  53.             return substr(trim(preg_replace("!\s+!"," ",str_replace("\n"," ",$m[1]))),0,256);
  54.         }
  55.  
  56.         return lcml_strip_url($url);
  57.     }
  58.  
  59.     function lcml_urls($txt)
  60.     {
  61.         $txt=preg_replace("!\[(http://[^\s\|\]]+?)\]!ie","'<a href=\"$1\">'.lcml_urls_title('$1').'</a>'",$txt);
  62.         $txt=preg_replace("!\[(www\.[^\s\|\]]+?)\]!ie","'<a href=\"http://$1\">'.lcml_urls_title('http://$1').'</a>'",$txt);
  63.         $txt=preg_replace("!\[(ftp://[^\s\|\]]+?)\]!i","<a href=\"$1\">$1</a>",$txt);
  64.         $txt=preg_replace("!\[(ftp\.[^\s\|\]]+?)\]!i","<a href=\"ftp://$1\">$1</a>",$txt);
  65.  
  66.         $txt=preg_replace("!(?<=\s|^|\()(http://[^\s<>]+)(\)|\.|,|\!|\-)(?=\s|$)!ie","'<a href=\"$1\">'.lcml_urls_title('$1').'</a>$2'",$txt);
  67.         $txt=preg_replace("!(?<=\s|^|\()(http://[^\s<>]+)(?=\s|$)!ie","'<a href=\"$1\">'.lcml_urls_title('$1').'</a>'",$txt);
  68.         $txt=preg_replace("!(?<=\s|^|\()(www\.[^\s<>]+)(\)|\.|,|\!|\-)(?=\s|$)!ie","'<a href=\"http://$1\">'.lcml_urls_title('http://$1').'</a>$2'",$txt);
  69.         $txt=preg_replace("!(?<=\s|^|\()(www\.[^\s<>]+)(?=\s|$)!ie","'<a href=\"http://$1\">'.lcml_urls_title('http://$1').'</a>'",$txt);
  70.  
  71.         $txt=preg_replace("!(?<=\s|^|\()(ftp://[^\s<>]+)(\)|\.|,|\!|\-)(?=\s|$)!i","<a href=\"$1\">$1</a>$2",$txt);
  72.         $txt=preg_replace("!(?<=\s|^|\()(ftp://[^\s<>]+)(?=\s|$)!i","<a href=\"$1\">$1</a>",$txt);
  73.         $txt=preg_replace("!(?<=\s|^|\()(ftp\.[^\s<>]+)(\)|\.|,|\!|\-)(?=\s|$)!i","<a href=\"ftp://$1\">$1</a>$2",$txt);
  74.         $txt=preg_replace("!(?<=\s|^|\()(ftp\.[^\s<>]+)(?=\s|$)!i","<a href=\"ftp://$1\">$1</a>",$txt);
  75.  
  76.         return $txt;
  77.     }
  78.  
  79.     $txt = lcml_urls($txt);
  80. ?>
 
+
-
edit
 

Balancer

администратор
★★★★★

Lenta.ru: Авто: В 2004 году General Motors отзовет для ремонта 7,7 миллиона автомобилей

Суммарное количество автомобилей, которые будут отозваны концерном General Motors в текущем году, достигло отметки в 7,7 миллиона штук. В частности, буквально в пятницу GM объявил о дополнительном отзыве 330 000 внедорожников нескольких моделей из-за проблем с ремнями безопасности этих автомобилей.

// lenta.ru
 

 
?? nightwolf #13.06.2004 01:47
+
-
edit
 

nightwolf

втянувшийся

test
Прикреплённые файлы:
 
 
+
-
edit
 

Balancer

администратор
★★★★★

Balancer wrote:
> "Balancer" <balancer@balancer.ru> wrote in message
> airbase.flejm_rugan_i_testy!411541@forums.airbase.ru" class="hft-urls">news:airbase.flejm_rugan_i_testy!411541@forums.airbase.ru...
> > 12345
> > 123
> > 123
> >
> > --
> > Для того, чтобы понять рекурсию, нужно сперва понять рекурсию
> >
>
> Test Тест
>
> .
>

vdfvdfv
&"""&
.
 
+
-
edit
 

Balancer

администратор
★★★★★

Balancer wrote:
> Balancer wrote:
> > "Balancer" <balancer@balancer.ru> wrote in message
> > airbase.flejm_rugan_i_testy!411541@forums.airbase.ru"
> class="hft-urls">news:airbase.flejm_rugan_i_testy!411541@forums.airbase.ru...
> > > 12345
> > > 123
> > > 123
> > >
> > > ≈
> > > Для того, чтобы понять рекурсию, нужно сперва понять рекурсию
> > >
> >
> > Test Тест
> >
> > .
> >
>
> vdfvdfv
> &"""&
>

Ку-ку!
.
 
+
-
edit
 

Balancer

администратор
★★★★★
Су-27
Як-38
МиГ-31М2

жопа
 
+
-
edit
 
+
-
edit
 
+
-
edit
 
+
-
edit
 
+
-
edit
 
RU ArmoryBlaid #30.06.2004 20:33
+
-
edit
 

ArmoryBlaid

втянувшийся

зад
Прикреплённые файлы:
 
 
+
-
edit
 

Rada

опытный


С себя можно начать когда все остальное будет в порядке.  
+
-
edit
 
+
-
edit
 
+
-
edit
 
+
-
edit
 

Balancer

администратор
★★★★★
Тест LCML
Форумы Авиабазы
Russia on the Net
 
Это сообщение редактировалось 02.07.2004 в 20:21

в начало страницы | новое
 
Поиск
Настройки
Твиттер сайта
Статистика
Рейтинг@Mail.ru