Hladanie odkazov v texte – PHP – Fórum – Programujte.com

Caute,
pri vkladani prispevku z guestbooku do databazy ho osetrujem nasledovne:

$text= substr($sprava,0,200);

			$text = htmlspecialchars($sprava);  

		        $text= trim($text); 

			$text= nl2br($text);			

			

			$slovo=split("[[:blank:]]+",$text);

			$text="";

			for ($a=0;$a<count($slovo);$a++):

				 $slovo[$a]=trim($slovo[$a]);

				 if(eregi("^(www\..+\..{2,3}.*)",$slovo[$a])):

				  $odkaz=eregi_replace("^(www\..+\..{2,3}.*)","<a href=http://\\1>\\1</a>",$slovo[$a]);	

				 elseif(eregi("^(http://.+\..{2,3}.*)",$slovo[$a])):

				  $odkaz=eregi_replace("^(http://.+\..{2,3}.*)","<a href=\\1>\\1</a>",$slovo[$a]);

				 else:

				  $odkaz=$slovo[$a];

				 endif;

				 $text.=$odkaz." ";

			endfor;

z regularnych vyrazov mam husu koze takze ti asi neporadim.
neco ma ale uputalo:

$text=substr($sprava,0,200);

$text=htmlspecialchars($sprava);

Prijde mi, ze to delas nejak hrozne komplikovane - pokud si dobre pamatuju, tak jsem nekde videl neco podobneho pomoci jedineho regulerniho vyrazu. A vubec, co ma presne delat tohle?

$slovo=split("[[:blank:]]+",$text);

:):):) zacinam s regularnymi vyrazmi. Prekukli ste ma
To olgo: mas pravdu to sa tam dostalo nedopatrenim.... Diky za vsimnutie ale v tom chyba nie je
To CommanderZ: ano rozdelujem spravu na slova v kazdom slove hladam retazec ktory odpoveda maske www.nieco.xy alebo http://nieco.xy

:(

v kazdom slove hladam retazec ktory odpoveda maske www.nieco.xy alebo http://nieco.xy

Nahrazavani reglernimi vyrazi spociva v tom, ze to smamotny retezec najde v celem dlouhem retezci a pak ho nahradi (s moznosti prenest nektere casti), zadne rozkladani na slova neni treba

To olgo:

nerad chytam za slovicka ale co http://www.nieco...?

To olgo:

nerad chytam za slovicka ale co http://www.nieco...?

nechapem ?? http://nieco.xy a http://www.nieco.xy je rozdiel nie ??

je to trosku mimo tema, ale misto for mi prijde elegantnejsi pouzit foreach

 $slova=split("[[:blank:]]+",$text);

 $text="";

 foreach ($slova as $slovo):

OhwJ2I <a href="http://kwirsvmhdhyc.com/">kwirsvmhdhyc</a>, [url=http://ivfbukaztxrd.com/]ivfbukaztxrd[/url], [link=http://trtqgamhahtu.com/]trtqgamhahtu[/link], http://hcdxlliihbup.com/

Hehe, s regularnima vyrazama si clovek uzije srandy :-)
Ale tohleto jsem vykoumal: ;-)

$text = "Nazdarek www.seznam.cz http://seznam.cz http://www.seznam.cz/neco.html seznam.czca";

  

$z = "((http://)?(www\.|[a-z0-9_\-]+\.)?([a-z0-9_\-]+)\.(eu|sk|com|net|org|biz|info|name|cz|de|ru|ac|ag|am|as|be|bz|cc|cd|ch|cn|at|eud\.ws|com\.cn|net\.cn|org\.cn|gs|in|co\.in|net\.in|org\.in|firm\.in|gen\.in|ind\.in|io|jp|la|li|lt|lv|ms|nu|sg|com\.sg|sh|tc|tk|to|tv|idv\.tw|com\.tw|org\.tw|co\.uk|me\.uk|org\.uk|vg|ws|com\.ws|net\.ws|org\.ws|gov\.ws)((/([a-z0-9_\-]*|\.|\.\.))*)([a-z0-9_\.\-]*)?)";

$do = '<a href="http://\\3\\4.\\5\\6\\9" style="color: #333399;">\\1</a>';

$vysledek = eregi_replace($z, $do, $text);



echo($vysledek);

lol, nemas jednodussi misto toho seznamu domen pouzit [az]{2-3}?

CommanderZ píše:#
# lol, nemas jednodussi misto toho seznamu domen pouzit [az]{2-3}?

HEHE , diky MOC.. pekne stary topic :) Vyskusam
P.s.: Ale moze niekto napisat aj toto: ...idem domov.info dostanete zajtra....

Muzes do toho zakomponovat umelou inteligenci :-P

mozna sem neco prehlid, ale podle toho reg vyrazu nebudou fungovat odkazy, ktere budou obsahovat ?(otaznik) coz v dnesni rewrite mode uz tak castno neni videt, ale prece jen je jich stale dost a dost :) mozna by ten vycet na konci(nemyslim domeny) stacilo prepsat na

([\S]*)

A :-) Mas pravdu, na to jsem uplne zapomel..

upraveny vyraz ;-)

"((http://)?(www\.|[a-z0-9_\-]+\.)?([a-z0-9_\-]+)\.(eu|sk|com|net|org|biz|info|name|cz|de|ru|ac|ag|am|as|be|bz|cc|cd|ch|cn|at|eud\.ws|com\.cn|net\.cn|org\.cn|gs|in|co\.in|net\.in|org\.in|firm\.in|gen\.in|ind\.in|io|jp|la|li|lt|lv|ms|nu|sg|com\.sg|sh|tc|tk|to|tv|idv\.tw|com\.tw|org\.tw|co\.uk|me\.uk|org\.uk|vg|ws|com\.ws|net\.ws|org\.ws|gov\.ws)((/([a-z0-9_\-]*|\.|\.\.))*)([a-z0-9_\.\-\?=%&]*)?)"

kdMBg8 <a href="http://uwyiuytrpcvx.com/">uwyiuytrpcvx</a>, [url=http://gozfmhxyfyjc.com/]gozfmhxyfyjc[/url], [link=http://rgstpxyxkpqh.com/]rgstpxyxkpqh[/link], http://pymjpxptixcs.com/

V reg výrazech se vůbec nevyznam a teď ani nemam moc času na to abych se je naučil, takže vás prosím o pomoc: použil sem kód od zelenáče a vše OK ale potřeboval bych když se v tom textu vyskytne např www.odkaz.cz/?id=34&neco=ds aby ten odkaz vypadal pak jako www.odkaz.cz a ne celý to ww.odkaz.cz/?id=34&neco=ds . Jestli to de nějak přes ty reg ??? Díky .

$z = "((http://)?(www\.|[a-z0-9_\-]+\.)?([a-z0-9_\-]+)\.(eu|sk|com|net|org|biz|info|name|cz|de|ru|ac|ag|am|as|be|bz|cc|cd|ch|cn|at|eud\.ws|com\.cn|net\.cn|org\.cn|gs|in|co\.in|net\.in|org\.in|firm\.in|gen\.in|ind\.in|io|jp|la|li|lt|lv|ms|nu|sg|com\.sg|sh|tc|tk|to|tv|idv\.tw|com\.tw|org\.tw|co\.uk|me\.uk|org\.uk|vg|ws|com\.ws|net\.ws|org\.ws|gov\.ws)((/([a-z0-9_\-]*|\.|\.\.))*)([a-z0-9_\.\-\?=%&]*)?)";

$do = '<a href="http://\\3\\4.\\5\\6\\9" style="color: #333399;">\\3\\4.\\5</a>';

$vysledek = eregi_replace($z, $do, $text);

Pomohli byste mi ještě jednou prosím : mám v textu tagy [ img]obr.jpg[/ img] a potrebuju dostat pomocí reg výrazů z těchto tagů ten název obrázku !
Zkoušel sem to sám ale fakt sem s tim nepohnul páč vůbec nechápu ty \\2\\4 v tom $do a reg výrazy taky moc neumim ! Moc díky i za předešlou radu.

EDIT: sorry ale neuvědomil sem si že ty samé tagy využívá programujte.cz pro zobrazení obrázku !!!

mám v textu tagy...

myslím že něco takového co potřebuješ jsem tu nedávno řešil:
http://programujte.com/forum.php?akce=prispevek&id=6119&sekce=obrazek-v-clanku

Jo díky. Pořád to ale nechápu ( ty reg. výrazy ). Můžete mi to někdo ještě osvětlit ? hlavně to s těma odkazam to //2//3 ...
A mohl bych vás ještě poprosit o jedno: Jak vytrhnu z textu části které sou mezi značkamy [list] a [/list] ???
Moc díky za odpověď .

takze, zavorky oznacuji v regularnim prikaze "podprikaz"(nebo jak to nazvat), ke kteremu je ve vysledku pristup prave pomoci //1,$1 nebo ja nevim jak jeste. to cislo(n) oznacuje obsah zavorky v n-tem poradi - (vyraz(vyraz1(vyraz2)))(vyraz3) ->
//1 = vyrazvyraz1vyraz2
//2 = vyraz1vyraz2
//3 = vyraz2
//4 = vyraz3

snad to chapes :)

k tomu listu:

$reg = "\[list\]([^\[]+)\[\/list\]";

To insider: Díky moc, už to chápu.

A jak by ten regulérní výraz vypadal v přídadě, že bych chtěl text mezi tagy [a][/a] nahradit <a href='text'>text</a>?
Děkuji

ereg_replace("\[a\]([^\[]+)\[/a\]", "<a href=\"\\1\">\\1</a>", $str)

uplne stejne, akorat list prepises na a ...
a nahrazovani potom

"<a href=\"\\1\">\\1</a>"

To Zelenáč : proc vkladas \\2, vzdyt je tam jen jeden subvyraz -> vkladat by se mela 1 a to plusko bych asi hodil spis za ] nez za ), protoze pri vkladani subvyrazu by se hodilo jen jedno pismenko

Jasne, uz jsem si toho vsimnul... Nejsem si jisty, jestli se to cisluje od nuly nebo od jednicky.. Pokud od jednicky tak \\1 je AFAIK cely vyraz a \\2 potom prvni zavorka !? Mozna, ze si to pletu s std. ereg...

J, tak tam ma byt \\1 :o)