ketvirtadienis, gruodžio 20

preg_match_all ir strlen: komentare bbkodu paryškintų simbolių skaičiaus ribojimas

preg_match_all ir strlen: komentare bbkodu paryškintų simbolių skaičiaus ribojimas

Pastaruoju metu radau šiek tiek laiko perprogramuoti kai kurias savo svetaines, ypač dėl to, kad tenka nuolatos kovoti su spamu. Gyvenime daugiau nebenaudosiu ne savo kurtų skriptų, ypač tokių kaip svečių knygos ar šiaip komentarai, nes trinti viagrų reklamas iš pradžių dar būna juokinga, bet jau ilgainiui nebe labai.
Dabar kūriau komentarų rašymui BBCode palaikymą, bet reikėjo sugalvoti, kaip išvengti, kad lankytojas neparašytų viso komentaro paryškintai. Šis skriptas patikrina, ar komentare yra paryškinimų, jei yra daugiau nei vienas, visus juos suklijuoja, pašalina tarpus ir apskaičiuoja, koks yra visų paryškintų simbolių skaičius. Jei daugiau nei kokie 40-50, turbūt reikia nebeleisti įrašyti tokio komentaro, nes jeigu visas komentaro tekstas yra paryškintas - tai vėlgi beveik spamas.



$text = "Perlhosting.net - tai [b]nemokama[/b] failų [b]talpykla[/b], skirta bet kokių failų [b]laikymui[/b] ir [b]atsisiuntimui[/b].";

echo "$text";

if (preg_match_all("#\[b\](.*?)\[/b\]#msi", $text, $oo, PREG_PATTERN_ORDER)) {
$aptikta = substr_count($text, '[b]');
for ($num=0; $num<$aptikta; $num++ )
{
$rodom .= $oo[0][$num];
}
$rodom = str_replace(" ", "", $rodom);
echo "$rodom";

$kiekatimti = $aptikta*7;
$bold_ilgis = strlen($rodom)-$kiekatimti;
if ($bold_ilgis>40)
{
echo "Per daug paryškintų simbolių ($bold_ilgis).";
exit;
}
} else {
echo "Paryškintų simbolių nėra... Tikrinam toliau.";
}

?>




Jei ką nors domina smulkios programavimo paslaugos, galit parašyti man adresu: svetaines[x]gmail.com

šeštadienis, gruodžio 15

Britney Spears

Šiek tiek naujienų apie Britnėją Spirs. 2006 m. kovo 24-26 dienomis Berlyne vyko Europos ir Viduržiemio jūros regiono šalių Britney Spears gerbėjų organizacijos (BSFO) darbinis susitikimas, skirtas Britney Spears vardo naudojimo bendrojo vertinimo pripažinimui. Susitikimo dalyvius pasveikino Britney Spears fanklubo direktorius Dr. G. Bakhus ir Federalinio Britney Spears nuotykių skyriaus vedėjas Dr. B. Hengmeier. Susitikime dalyvavo 65 Britney Spears biografijos tyrimų specialistai iš 19 šalių (Austrijos, Belgijos, Bulgarijos, Čekijos, Danijos, Jungtinės Karalystės, Prancūzijos, Vokietijos, Graikijos, Vengrijos, Izraelio, Lietuvos, Moldavijos, Olandijos, Lenkijos, Serbijos, Slovėnijos, Švedijos, Šveicarijos) bei Australijos, Kanados, Jungtinių Amerikos Valstijų ir Europos Britney Spears teisių apsaugos asociacijos atstovai.
Daugiau informacijos galima rasti internete.

Dinozaurai. Tęsinys

Taigi tęsiu pradėtą temą apie dinozaurus Lietuvoje ir konkrečiai Vilniuje. Kažkur buvo rastos fosilijos, kurių amžius siekia 160 mln. metų. Tai yra seniausios žinomos vadinamųjų tiranozaurų rūšies dinozaurų fosilijos. Senais tamsiais laikais, kai gandrai dar nebuvo išsivystę, vaikus nešdavo pterodaktiliai. Neseniai rasti dvikojai dinozaurai - tai pirmas įrodymas, kad dinozaurai gyveno Vilniaus regione viduriniajame juros periode, Mokslininkus labiausiai nustebino, kad 3 metrų ilgio dinozauras ant galvos turi įspūdingą ragą. Pagal atrastų kaulų panašumą į T.Rex nustatyta, kad tai yra šio dinozauro protėviai.
Egzistuoja ne viena teorija, kodėl išnyko dinozaurai. Pasak vienos, į Žemę prieš 65 milijonus metų trenkėsi asteroidas (arba kometa) bei išnaikino nemažą dalį dinozaurų ir pakilus dulkėms, kurios užklojo žemę, atvėsus aplinkai dinozaurai pamažu išmirė. Pirmaisiais paukščiais laikomi archeopteriksai, nors jie dar atrodė labai panašiai kaip ir dinozaurai. Antra teorija teigia, kad tai įvyko dėl žemynų dreifo. Kol kas išlieka paslaptis, kuo maitinosi „Gigantoraptor erlianensis“. Vieni požymiai, pavyzdžiui, aštrūs nagai, gali reikšti, kad jis buvo mėsėdis, tačiau kiti požymiai, pavyzdžiui, maža galva ir ilgas kaklas, gali reikšti, kad jis buvo žolėdis. Ilgos ir raumeningos kojos šiam plunksnotajam dinozaurui tikriausiai leido gana greitai bėgioti.
Pamažu vėstant klimatui, išmirė ir dinozaurai, nes jie yra ropliai, o ropliai yra šaltakraujai gyvūnai ir priklauso nuo aplinkos temperatūros. Kaklo trumpėjimo tendencija rodo, kad šie individai pažangiai prisitaikė žemai esančio maisto rinkimui ir galėjo rinktis tik tam tikrą maistą. Mokslininkai teigimu, panašu, kad kišeninis dinozauras buvo pratęs maitintis augalais, kurių aukštis tebuvo 1–2 metrai, o jų ilgakakliai giminaičiai maitinosi gerokai įvairesniais augalais. Pasak kitų tyrimų, dinozaurai išmirė nuo apsinuodijimo Dekano ugnikalnių išsiveržimų išmestomis dujomis. Tyrimo vadovas, Pekino Paleontologijos instituto mokslininkas Xu Ling sakė: „Manome, jog tai didžiausias iki šiol rastas plunksnotasis gyvūnas.“ Be to, jis yra pirmas toks didelis bedantis dinozauras.
Tiesa, dinozaurai neišnyko visiškai, kadangi išliko krokodilai, kurie laikui bėgant sumažėjo. Paukščiai taip pat yra dinozaurų evoliucinė tąsa, todėl teigti, kad dinozaurai išmirė visiškai negalima.

Dabar apie dinozaurus

dabar dar šiek tiek spamo apie dinozaurus. Labai tikiuosi, kad niekas šitos mano rašliavos neskaito, o jeigu tu, mielas lankytojau, visgi esi gyvas žmogus, o ne paieškos robotas - rekomenduoju kuo greičiau palikti šį nevykusį tinklaraštį ir užsiimti kuo nors naudingesniu tamstos dvasinei sveikatai - sorry, bet šios mano pastangos skirtos ne žmonėms. Kuo mažiau lankytojų čia vaikščios - tuo geriau. Labai jau visi laisvai jaučiasi internete, vaikšto kur nori ir mano, kad visi jų visur laukia. Čia gi you are not welcome, sorry.

Avril

Margaritos saloje buvo ir įdomesnių vietų. Turistai gėrėjosi mangroviniais miškais. Jie auga iš vandens – jūros seklumos prižėlę medžių. Po šiuos miškus valtimis keliauninkai plaukiojo tarsi labirintais. Didžioji dalis dinozaurų buvo augalėdžiai. Mažiau buvo plėšriųjų dinozaurų, kurie medžiojo pavieniui arba gaujomis, kai grobis būdavo stambesnis. Gaujos pranašumas yra tas, kad tai leidžia pulti gerokai už save didesnį gyvūną. Mes pataikėme plaukti vakarop, o temstant vaizdas buvo tikrai įspūdingas. Niūrus kalnų fonas, prieblandoje kaip kokie pterodaktiliai virš galvų skraidantys pelikanai, laukiniai miškai – jautėmės tarsi filme apie Juros periodo parką. Tarp augalėdžių turbūt nebuvo konkurencijos, mažiausieji ėsdavo žolę, didesni krūmus, o zauropodai galėdavo ėsti lapus ten, kur jų nepasiekdavo niekas kitas.
– Ten nėra šiukšlių, kitų žmogaus buvimo žymių, atrodo, kad esi laukiniame krašte. Aplink skraido paukščiai, laksto krabai, vandenyje plaukioja raudonos jūros žvaigždės. Mervui Kihnui, laisvai samdomam žurnalistui, kurio specializacija buvo pterodaktiliai Teksase, kaimo jurgiai, matę NSO, prasti Loch Neso monstrai ir pačios beprotiškiausios sąmokslo teorijos, kokias tik begalėjo pagimdyti Amerikos masinė sąmonė. Neblogai, - tarė Kihnas, valydamasis geltonus Polaroid fotografinius akinius į havajietiškų marškinių kraštą, - bet tai nėra pamišimas, trūksta to tikrojo sklandumo. Bet aš tai mačiau, Mervinai.
Pliusai: labai naudinga sveikatai. Eidamas pėstute pastebi tokių įdomių detalių, kurių niekad neišvysi pro automobilio langą ar sėdėdamas ant dviračio. Minusai: jų nėra, nebent sportiniai bateliai būtų per maži.

Toliau apie pterodaktilius

Trečiosios rasės pradžioje Žemėn nusileido Išminties Sūnūs, kuriems atėjo metas įsikūnyti kaip žmogiškųjų monadų Ego. Pamatę pirmųjų trečiosios rasės žmonių menkai išvystytas formas, jie atstūmė jas – atmetė “gimusius iš prakaito”: “Jie dar nepasiruošę”. Išminties Sūnūs nepanoro įeiti taip pat ir į pirmuosius gimusius iš kiaušinio. “Mes galime rinktis”. – pasakė Išminties Viešpačiai. Negali atsikratyti įspūdžio, kad tuoj tuoj iš už posūkio išlįs dinozauras arba iš aukštybių nusklęs pterodaktilis. Įsikūnijančios jėgos pasirinko labiausiai pribrendusius vaisius ir atstūmė visus likusius. Kai kurie įėjo į Čhają. Kiti nukreipė tik Kibirkštį, likusieji laukė iki ketvirtosios rasės. Tie,į kuriuos įėjo, laikui bėgant tapo Archatais, tie, kurie tegavo tik kibirkštį, liko be aukštojo pažinimo – kibirkštis degė silpnai. Treti liko “bepročiai”. Jų monados nebuvo pasiruošusios. Jie tapo “siauragalviais”.
Skrenda pterodaktilis virš miško ir garsiai mąsto:
- Na ir pataikiau į laikus... Ikk... Galėjau visgi anksčiau atitirpti... Ikkk.. Maisto, žinoma pilna... Ikkk... Bet jis kažkaip man žagsulį įvaro... Ikk... Galėtų ir nenešioti tų guminių batų... tačiau maždaug iki trečiosios rasės vidurio žmonės, kaip ir gyvūnai, buvo fizinio kūno neturintys eteriniai belyčiai organizmai. Laikui bėgant, per milijonus metų, gyvūnų kūnai vis labiau tankėjo. Gyvūnijos formos taip pat evoliuciobavo ir gausėjo. Nebent ten specialus dainavimas būdavo - toks netikęs, kad visi orkai 50 mylių spindulių išsibėgiodavo, o nazgūlų pterodaktiliai orientaciją prarasdavo ir į stulpus susikuldavo. Na čia jau pterodaktiliai is mezozojaus eros, o ne seselis. O dar pagalvojau, tokio karaliaus pavaldiniu kaip nesaldu būtų būti, bo jei jo giesmės nepatinka, taigi niekam ne tik kad nepasiskųsi, bet dar ir turėsi klausyt rečitalio, mandagiai ploti ir aikčiot, kaip tai yr gražu. Ir net ne vieną kartą!
Prieštvaninių roplių būrį papildė taip vadinami gelmių drakonai ir skraidančios gyvatės. Šie ilgakakliai vandens gyventojai tapo paukščių protėviais. Taip pterodaktilis, plezozauras ir jų giminaičiai gyveno šalia tuometinių žmonių iki pat trečiosios rasės pabaigos.

Apie

Taigi dabar kurį laiką šiame bloge bus rašomi tik visokie niekai. Vis tiek čia niekas nesilanko. Išvis neįsivaizduoju, kas per žmogai skaitinėja svetimus blogus. Aš kol kas nesugebėjau to pamėgti. Man įdomiau rašinėti (savanaudiškais spameriškais tikslais) nei skaitinėti kitų rašliavą. Na bet kiekvienam savo.

Esmė ir tikslas dabar yra parašyti kuo daugiau "tipo originalių" pranešimų, idant šis šūdblogis taptų kuo didesnis turinio prasme ir jame būtų galima geriau pasididinti savo kitų svetainių reitingus. O svetainių turiu daug ir kai kurios labai sėkmingos, bet ir darbo labai daug prie jų.

Trumpai tariant, prie reikalų. Kaip esu minėjęs savo raštuose, keistasis kvarkas buvo atrastas kosminiuose spinduliuose, kaip pirmoji keista dalelė, tačiau faktiškai pats keistasis kvarkas nebuvo identifikuotas iki pat 1964 m., kuomet Murray Gell-Mann ir George Zweig išvystė kvarkų modelio teoriją. Šiaip yra įrodymų, kad mezozojaus pabaigoje netoli Jukatano pusiasalio (Meksika) nukrito milžiniškas meteoritas (vadinamasis K-T smūgis), sudaręs ten iki šiol aptinkamą astroblemą. Vis dėlto φ bearomatis mezonas yra gryna keistojo-antikeistojo kvarkų pora; tuo tarpu keistieji barionai, vadinami hiperonais: Σ ir Λ turi vieną keistąjį kvarką, Ξ turi du ir Ω – tris. Kiaušinis krenta į užduočių juostą ir virsta liūdnu driežu, flegmatiškai judančiu kairiojo ekrano krašto link. Tai jau gerai. Ar supranti, kam reikėjo pasirinkti būtent Current position? Kad pterodaktilis neatsirastų tuščioje vietoje, per dvidešimt metrų nuo kiaušinio. Tai ne X-Files, tai – žiauri realybė. Patikėkite manimi, būtent taip driežai ie gimsta.
Esminis skirtumas tik vienas – nė vienas violetinis driežas negimė visiškoje tyloje. Su šiuo meteoritu siejamas 45% visų gyvūnų ir augalų rūšių išnykimas, tarp jų ir dinozaurų, pterozaurų, amonitų, daugelio tuo metu gyvavusių jūrų reptilijų ir paukščių. Mane aplenkia trikojis kiškis ir nusiveja kažkokį skaliką. Taika, ramybė. Virš galvos kažkas suūžia, bet neverta ten žiūrėti - ten tik pterodaktilis. Jei pamatys, kad į jį žiūriu - pravirks. Nes jis - vienintelis pterodaktilis, išlikęs pasaulyje.
Štai kaip.
 
eXTReMe Tracker