10000 diskusních příspěvků na tomto blogu
Školení, která pořádám 
Čtenáři tohoto blogu už napsali téměř deset tisíc diskusních příspěvků. Nechce se mi tomu ani uvěřit a přemýšlím, jestli tady někde neskladuji hromady spamu. Téměř čtvrtinu těch příspěvků jsem napsal sám, zbytek jsem přečetl. Jak si sami můžete spočítat, tak příspěvků přesně deset tisíc ještě není. Proto vyhlašuji soutěž o ten desititisící příspěvek. Vyhrává ten, kdo ho napíše k tomuto článku. Ze soutěže ale bude vyřazen ten, kdo sem napíše příspěvek, který bude menší než desetitisící. Nikdo také nevyhraje, pokud kulatý příspěvek někdo napíše k jinému článku.
Výhra bude symbolická – zveřejnění jména autora kulatého příspěvku na tomto blogu a stručný rozhovor s ním o tom, jak se mu výhry podařilo dosáhnout. 10000. příspěvek napsal a vítězem se stal Roman Jakubec.
Diskusní příspěvky můžete i průběžně sledovat.
Diskuse
stano:
Nuz, ja sa tomu mnozstvu diskusnych prispevkov ani nedovim - toto je jedna z mala kvalitnych stranok o php v cz/sk. Za to patri p. Jakubovi velke diky. (Inak prave v robote nemam co na praci tak skusam v mobile operu mini - stranky sa zobrazuju korektne.)Daniel Máslo:
To zaslouží gratulaci, pěkné číslo. Jen tak dál.
Martin R.:
A na dalších 10k příspěvků hodně trpělivosti. Díky za tvou práci.Lukas:
To je slušné číslo, gratuluji.
Oldřich Šálek:
Vzhledem k tomu, že jsme na PHP blogu, tak bych výherce tipoval tak, že to bude PHP programátor, který si napíše skript pro kontrolování aktuálního počtu komentářů a ve správné chvíli odešle svůj komentář…
srigi:
Velmi podobne ako sutazenie na Twittri o "miliardovy" tweet.martin:
nejsem to já?
ady:
ze by jaHonza Marek:
k čemu rozhovor?Lukas:
A proc ne? Se mnou napriklad jeste nikdy nikdo rozhovor nedelal a tak mam konecne jednou sanci uzit si svych par minut slavy? :-)
Jakub Vrána 
:
Je to uvedené v článku. Také připomínám své právo mazat nesmyslné nebo nesouvisející příspěvky.
Jakub Vrána : Honza Marek:
Čím byly moje příspěvky nesmyslnější než "že by já"? Jakub Vrána :
V článku je jasně uvedeno, že nevyhraje ten, kdo k tomuto článku napíše komentář dřív. Takže dokola psát „že by já“ znamená pouze kazit soutěž ostatním, což považuji za nesmyslné.
Jakub Vrána : Honza Marek:
Pochopil jsem tu soutěž jako počítací a ne jako čekací, tak jsem považoval za férové napsat si svých 8 příspěvků.Honza Marek:
Měl jsem si přečíst zadání :)Lawondyss:
Je zkrátka vidět, že tenhle blog prostě jede.
Radek:
Velmi pěkný blog, přeji mnoho nových čtenářů...Roman Jakubec:
Že jsem teď naspal příspěvek číslo 10 000? :) Jakub Vrána :
Gratuluji, jde skutečně o 10000. příspěvek! Jak se ti podařilo výhry dosáhnout?
Jakub Vrána : Roman Jakubec:
Programátorům se omlouvám za tento paskvil, ale:<?php
if ($_SERVER["REMOTE_ADDR"] != "86.49.96.103"){
echo "nechci podvadet, jen poukazuji na to, ze to jde ;)";
exit;
}else{
$ch = file_get_contents("http://php.vrana.cz/archiv.php");
$ch2 = ereg_replace("^.*<table cellspacing=\'0\' cellpadding=\'3\'>", " ", $ch);
$ch3 = ereg_replace("</table>.*$", " ", $ch2);
$ch4 = ereg_replace("</tr>", "¤", $ch3);
$pole=explode("¤",$ch4);
foreach ($pole as $radek) {
$radek = ereg_replace("^.*diskuse</a>: ", "", $radek);
$radek = ereg_replace("</td><td.*$", "", $radek);
$cislo = $cislo + $radek;
}
}
?>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />
<title>už jen pár</title>
<script type="text/javascript">
setTimeout(function(){
location.href = "http://divx.4fan.cz/hihi.php";
}, 1000);
</script>
</head>
<body <?php if ($cislo > 9997) echo "style=\"background-color:red;\"";?>>
<b style="font-size: 4000%;"><?php
echo $cislo;
if ($cislo > 9997) echo "<embed src=\"do_not_go.wav\" autostart=\"true\" width=\"128\" height=\"32\">";
?> </b>
</body>
</html>
Jakub Vrána :
Kód vskutku zrovna pohledný není, ale i tak gratuluji! Hlavně oceňuji manuální práci s odesláním příspěvku – kdybych to psal já, tak robot příspěvek rovnou i odešle.
Tímto taky všechny prosím, aby si vypli své roboty, ať se zbytečně neplýtvá trafficem :-).
Jakub Vrána : Roman Jakubec:
Curl měl server vypnuté. Napadlo mě napsat automatické odeslání ajaxem, ale na to jsem byl moc línej a možná by mně mj41 předběhl. Jakub Vrána :
Ono to jde i bez CURL a dokonce bych řekl, že i snadněji: http://php.vrana.cz/eurotel-sms.php.
Jakub Vrána : Roman Jakubec:
Děkuji, aspoň se přiučím, a do dalších 10k se zlepším :)mj41:
Na http://mj41.cz/wiki/10000 je můj kód. I s chybou co jsem tam zanesl dneska. Asi to bude tím, že mám chřipku :-).
mj41:
Pokus o příspěvěk číslo 10000 na tomto blogu. perl++
Roman Jakubec:
Zdá se že má ruka a počitadlo php je rychlejší nž perl++ :DHever:
Reakční doba vteřina ... přísné :)<?php
preg_match_all('~.*diskuse\<\/a\>\: (\d+).*~',file_get_contents('http://php.vrana.cz/archiv.php'), $matches);
echo array_sum($matches[1]);
Roman Jakubec:
Já tedy použil mnohem ošklivější kód. Nejsem zkušený programátor, spíše se učím, a webhostitg měl zakázanou curl, proto jsem vkládal příspěvěk ručně. :)mj41:
Gratuluji. Já to moc nehrotil. Včera jsem prodloužil časy a už jsem je nestihl vrátit zpět :-).
Ivan:
Preji dalsich 10000 prispevku drive nez za, uz skoro, sest let existence tohoto blogu, proste at to tu vic zije. A jako predsevzeti do noveho roku si davam to, ze sem nejake prispevky napisu i ja.Zdenek:
Ja nechci aby byl muj prispevek desetitisici, protoze Jakub ma urcite v zaloze nejake prispevky k promazani, takze minimalne si preji at je muj prispevek 10 001. No a uz predem slibuji, ze se urcite zucastnim souteze k 20 000 prispevku. :-)Jiří:
Šance, že tenhle příspěvek bude desetitisící je malá, ale aspoň mě něco přinutilo poděkovat za tento blog. Takže díky a přeji ať se tu brzo dosáhne dalších deseti tisíc (samozřejmě kvalitních) diskusních příspěvků.Hever:
Tak to bylo rychlé ... ;(
tiso:
Tak som to tu prešvihol (ešte je šanca, že mazať nesúvisiace príspevky), tak prajm veľa nervov na čítanie tej ďalšej 10000-ky.
Tento článok si vyslovene pýta podrobnejšiu štatistiku:
- počty príspevkov/komentujúcich za jednotlivé roky
- najdiskutovanejšie články
- najaktívnejšich komentátorov
- priemerná dĺžka príspevkov
- ...
Pridám skript na počítanie príspevkov:
<?php
$content=strip_tags(file_get_contents('http://php.vrana.cz/archiv.php'));
if(false !== preg_match_all('/diskuse:\s(\d+)/', $content, $matches)){
echo array_sum($matches[1]);
}
?>
tiso: Jakub Vrána :
Dobrý nápad. Pokud by to zajímalo ještě někoho dalšího: http://php.vrana.cz/statistiky-diskusnich-prispevku.php
Jakub Vrána : Matej:
10000 :)Matej:
:) skoda, siel som na obed a pc som uspal tak moj robot nemohol poslat skorej, no ale cakal som ze to bude az tak za tyzden....
Jakub Bouček:
Pokud by někoho zajímal můj robot:
http://x0.cz/6yhh (vím, nic moc, ale napsáno za 20 minut)
Je potřeba knihovna Snoopy.
http://sourceforge.net/projects/snoopy/
Bohužel jsem to pouštěl Cronem jednou za minutu a to zjevně nestačilo.
Jakub Bouček: 
pa3k:
Ja som sa spoliehal na to, že nikto spam nepošle :) Toto som práve chcel nechať volať cron-om každých 5 minút... Žiaľ nejak sa s komentármi roztrhlo vrece.
<?php
set_time_limit(300);
$content = "";
do {
$content = file_get_contents("http://php.vrana.cz/atom.php?diskuse");
if (false===strpos($content, "#d-11291")) {
sleep(60);
} else {
sleep(1);
}
} while(false===strpos($content, "#d-11292"));
do {
$fp = @fsockopen("php.vrana.cz", 80, $errno, $errstr, 30);
} while (false===$fp);
$post_content = "re=&jmeno=pa3k&url=www.kvalitne.sk&zprava=Gratulujem+k+10000.+koment%C3%A1ru%21+&robots=spamno";
$header =
"POST http://php.vrana.cz/diskuse.php?clanek=10000-…-tomto-blogu#new HTTP/1.0".
"\r\n".
"User-Agent: Nazdar Jakub!".
"\r\n".
"Content-Type: application/x-www-form-urlencoded".
"\r\n".
"Referer: http://php.vrana.cz/10000-diskusnich-prispevku-….php#diskuse".
"\r\n".
"Content-Length: ".strlen($post_content).
"\r\n".
"Connection: close".
"\r\n".
"\r\n".
$post_content
;
fwrite($fp, $header);
stream_set_blocking($fp, TRUE);
stream_set_timeout($fp, 30);
$response .= fread($fp, 10000);
fclose($fp);
echo $response;
?>
pa3k: 
The Zero:
Mně se to vešlo to 128 znaků :)
wget -O - http://goo.gl/0uCfx|grep 'e</a>:'|sed s/'^.*e<\/a>: \([0-9]*\).*$'/\\1/g|php -r 'echo array_sum(file("php://stdin"));'
The Zero: Peter Lištiak:
To je pekné. Mne php nenapadlo použiť a tak to mám dlhšie.#!/bin/bash
pocet=0
for i in `wget -O - http://php.vrana.cz/archiv.php | grep ">diskuse</a>" | sed "s#^.*>diskuse</a>: \([0-9]*\).*#\\1#"`; do
let "pocet+=$i"
done
echo $pocet
tiso:
To je na stránke s článkami o PHP zaujímavé tvrdenie. Ako si sa tu ocitol?
tiso: Samanta:
To je celkem úspěch, měj se hezky a ať ti to jde dál takhle dobře.
kozotoč:
Ve tvém úplně prvním článku se pár sebevědomých jedinců chlubilo svými projekty o PHP, z toho jeden, který ho začal o 14 dní před tebou.
Kde je jim konec....
Diskuse je zrušena z důvodu spamu.
© 2005-2024 